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Introduction 

This is the reference manual for the Model I (Ml) central pro- 
: cessor. It is intended to be a complete and self-contained 
description of the characteristics of the processor from the 
point of view of a machine language programmer (although it 
is hoped that few programmers will ever have occasion to des- 
cend to machine language) „ Omissions and inconsistencies 
should be drawn to the attention of the authors . 

Three considerations have dominated the design of the Ml. They 
are stated here in the hope that they will make clearer the ra- 
tionale for some of the machine's characteristics. 

1) The Ml will be implemented on a somewhat modified version 
of a BCC microprocessor. This implies that peculiar instruc- 
tion and addressing sequencing can be used freely. No atten- 
tion has been paid to the requirements which might be imposed 
by alternative implementation . 

2) The Ml will be programmed almost entirely in SPL or FORTRAN. 
It is therefore essential that the common constructs of these 
languages have efficient hardware counterparts. Most notable 
among them are array referencing, function calls and returns, 
part-word field accessing and string processing. Furthermore, 
it is pointless to include features which cannot be used by the 
compilers we are likely to write . 

3) The Ml must have a mode in which it is essentially compat- 
ible with the SDS 940 . 




Gen eral_ Ch a:ca c t e r i stie s a n d S t a to 

The Ml is a 24-bit word-oriented twos 'complement machine. It 
has 64 instructions and a variety of addressing modes . Bits arc 
numbered to 23 with bit on the left (most significant) end. 
of the. word. Both single (48-bit) and double (96-bit) precislor 
floating point arithmetic is implemented in hardware. 

Tfr e state of the machine, by which we mean the information whicl 
must be preserved, together with the contents of memory, to per- 
mit execution of a program to be continued without disturbance, 
consists of 12 words of information arranged as follows, to- 
gether with a context block . 



Word 


Bits 





0-5 





6-23 


I 


0-23 


2 


0-23 


3 


0-23 


4 


0-23 



Name 

P 
A 
B 
C 
D 



Contents 



5 


0-11 


E 


.6 


0-23 


X 


7 


0-23 


L 


8 


0-23 


G 


Q 


0-23 


SR 


9 


23 


IKSTD 


o 


22 


ov 


9 


21 


TOV 









unused 

Program counter 

A register 

B register 

C register 

D register. C and D are used as an' 
extension of AB for double-precision 
floating point arithmetic 

Floating point exponent 

Index register 

Local environment register 

Global environment register 

Status register 

Instruction terminated bit 

Overflow bit 

Temporary overflew bit 
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9 


20 


CARRY 


9 


19 


PDFLAG 


9 


18 


TDFLAG 


9 


17 


XMONT 


9 


16 


XUTILT 


9 


15 


SUF 


.9 


14 


940M 


9 


12-13 


CC 


9 


9-11 


PRMOD 


9 


6-8 


TRMOD 


.9 


5 . 


FDP 


10 


0-23 


CTC 


11 


0-23 


IT 


The context block contc 


for the 


currently runn: 


Address 


Space 


and Map 



Carry bit 

Permanent double-precision flag 
Temporary double-precision flag 
Monitor exit trap flag 
Utility exit trap flag 
Soft underflow flag 
940 mode 
Condition code 
Permanent rounding mode 
Temporary rounding mode 
Full double precision flag 
Compute time clock 
Interval timer 
i in certain fixed locations the 



man 



The Ml considers itself at any particular time to be running a 

process which is defined by a context block, which is a 2048 

word block of memory, in a way which we now proceed to describe. 

Each process has a 256K address space ; i.e. the Ml processor 

uses 18-bit addresses to specify memory locations, the 

address space has two significant characteristics: 

1) it is divided into three rings as follows: 

addresses 0-377777B user ring (lowest) 

403000B-577777B utility ring 

400000B-402777B and 

600000B-777777B monitor ring (highest) 
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The rings are protected from each other according to certain 
rules. Every memory reference is said to have a source . The 
source for any references generated by an instruction up to 
and including a fetch of an indirect word is, for example, the 
program counter; the source for any reference generated 
after a fetch of an indirect word up to and including a fetch 
of the next indirect word is the address of the first in- 
direct word. Every reference also has a target, which is the 
address being referenced. The following matrix defines those 
combinations of source and targets which are legal . 



User 
User Yes 
Source Utility Yes 
• Monitor Yes 



Target 

Utility Monitor 

No No 

Yes No 

Yes Yes 



To summarize: 

a) References from one ring to a higher one are 
forbidden. 

b) If indirection leads to a lower ring, it is for- 
bidden to return to the same or a higher ring during the 
same instruction. This fact makes it easy, for example, 
for monitor routines to enforce the user's protection 
rules when storing into a table provided by the user: 
they need only do their stores indirect through an address 
in the user ring, and the ring protection hardware will do 
the checking automatically. 
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A forbidden reference causes trap MACC . The target is passed 
as a parameter to this trap. 

The reason for putting 400000B-402777B in the monitor ring 
is that the operating system is expected to leave the context 
block in the map at 4B5 and 6B5 so that both monitor and 
utility can use it for storage. The monitor will then have 
words - 2777B of the context block available to it and 
protected from the utility, and the utility will have 
3000B-3777B. Since the last word of the context block is 
at 403777B in the utility ring, the utility can extend its 
section of the context block with additional contiguous 
storage . 

2) The address space is organized into 2048 (2K) word 
pages , and the precise collection of pages which make up 
. the address space is specified by the map. Pages are named 
in a manner independent of their location in core, and the 
mapping hardware uses this location - independent name, 
together with a table called the core hash table (CHT), to 
determine the physical core location of a page . The page 
number (the top 7 bits} of every memory reference thus 
requires two levels of translation: 

from page number to location - independent name 

from location - independent name to physical page address 

The various mechanisms for performing this translation will 
now be described. 
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Locations 200B-277B in the context block contain the map . 

These 128 half-words specify the contents of the corresponding 

128 pages of the address space of the process; the high order 

half-words corresponding to even indices . Each half-word is 

interpreted as follows: 

Bit Name Contents 

MAPRQ Read-only hit. This bit is merged 

with the RO bit in PMT to make the 
read-only bit interpreted by the 
hardware 

1-3 unused 

4-11 PMTI a PMT index 
The private memory table (PMT) provides enough information 
about each page accessible to the process to permit the hard- 
ware and the memory management to access the page . The PMT 
starts at location 300B in the context block. Each entry is 
4 words long; the address in the context block of PMT entry i 
is therefore 4(i-l) + 300B. 

A PMT entry has the form 

Word Bits Name Contents 






0-23 


UNI 


1 


0-23 


UN2 


2 


2-23 


DA 


3 


■ 


PMTRO 


3 


1 


PREF 


3 


12 


SF 



First 24 bits of unique name for 
the page 

Second 24 bits of unique name for 
the page 

Disk address of the page 

Read-only bit 

Page has been referenced 

Page is scheduled for the process 
(i.e. 3 in core working set and 
the process is active) 

The other bits are not used by hardware 




Note that there is no provision for execute-only pages, 
since this device by itself is not sufficient to protect 
propreitary programs. The sub-process structure of the 
monitor is supposed to be used for this purpose. 

The central processor contains a physical ma p (PM) which 
has 128 registers of 11 bits each. One of the registers 
has the form 

Bits Name Contents 



EF Empty flag 

1 DB Dirty bit, set if the page has 

been stored into since it was 
read from the drum 

2 PMRO Read- only bit 

3-10 PA Physical address of page in 

a real core of up to 512K. 

When a new process starts' to run on the processor, the 
empty flag is set in each PM entry. Every address gener- 
ated by the program must be mapped to convert it from virtual 
to real so that an access can be made to the real core . 
This is done by taking the top 7 bits of the 18-bit address 
and using them to select one of the 128 PM entries. 
If the empty flag is off, the remainder of the entry is 
returned. The PA field is prefixed to the last 11 bits of 
the virtual address to make a real address. If the access 
is a store and PMR0=1, the store is aborted and the PRO 
trap is caused. If the access is a store,- PMRO=0" and 
DB=jZf, the dirty bit in the CHT entry for the page is set 
and DB is set to 1 . . 
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If the empty flag is on ; the PM entry must be loaded . 
Let its index be i. First, entry i of the map (i.e. 
half-word 200B+i in the context block) is fetched. If PMTI 
is 0, trap PNIM occurs. If -it is not 0, MAPRO [i] is 
saved. Then the PMT entry specified by PMTI [i] is fetched. 
Call it entry n. If SF[n] = 0, .trap PNIC occurs. PMTRO is 
saved r if PREP [n] = 0, it is set to 1; the UN found in PMT 
[n] is then looked up in the core hash table. 

The core hash table contains a six-word entry for each 
page of real core. .It starts at location 400B in real 
core and is organized as a chained hash table.. Each entry 
has the form 

Word Bits Name Contents 






0-23 


UNI 


1 


0-23 


UN2 


2 


2-23 


DA 


3 





DIRTY 


3 


1 


U 


3 


2-4 


PST 


3 


5-12 


CPA 



First 24 bits of unique name 

Second 24 bits of unique name 

Disk address of page 

Dirty bit 

Unavailable bit 

Page status 

Core page address . This is also 
implied by the index of the en- 
try in CHT 

16-23 SCHED Number of occurrences of page 

in loaded working sets 

Free core list pointer 

Page lock 

Collision PTR 



4 


6-23 


FCLP 


5 


0-5 


PL 


5 


6-23 


CojP 



■-•&FZ**^i>0f#c«* 
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A page Is found by hashing the UN as described in KMl/lv-1. 

If the page is found, CPA and DIE.TY are copies into the PM 
and PI-3,0 is set to MAPRO PMTRO [n] . If (U OR PST) ^ or 
the pa'ge is not in CHT, trap PNIC occurs. 

All the traps (PRO, PNII4, PNIC) which can be generated by the 
mapping operation are given the virtual address being mapped 
as a parameter. 

To make sure that a particular page is not being used by the 
CPU,, an external processor may request a scan of the physical 
map. When such a request is received; the PA field of all 
non-empty registers in the physical map is matched against 
.the contents of cell 2455B + CPU number *4. If any of them 
matches the MAB trap occurs. The message cell is set to 4B7 
upon completion of the scan, regardless of the outcome. 

Addres sing from I nstructions 

The machine has a rather complex addressing structure. The 
address calculation is performed in the same way for every 
instruction _, and it may yield either an operand OP or an 
effective address Q or both. To specify this calculation 
it is necessary to define the format of an instruction and ■ 
of an indirect address word" (IAW) . For an instruction 

Bit Name 940 Mode Norm al Mode 

S Syspop bit Part of TAG 

1 X' Index bit Part of TAG 

2 P ' Pop bit Part of TAG 
3-8 OPC Opcode Opcode 

9 I Indirect bit Pop bit 

lp-23 W Address field Address field 

An IAW format depends on the mode. In 940 mode it is 
exactly like an instruction, except that S, P, and OPC 
have no significance and are ignored. Otherwise it looks 
.like this: 
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0-1 IAT Tag field which defines the meaning of 

the rest of the word, 

2-23 BODY The meaning depends on IAT 

Since the addressing is rather complex, it seems worthwhile 
to explain in some detail what the various features are for, 
before describing them precisely. There are a number of 
points which influenced the design: 

1) It is necessary to be able to conveniently address 
a 256K (18-bit) address space, even though an instruction 
has only a 14-bit address field. . - 

2) Programs are normally written in relatively small 
units, each of which references some private storage of its 
own and some global storage. 

3) Array references are very common. Since there is 
only, one index register for holding subscripts, it would be 
very nice to have a convenient way of using core locations 
for indexing. Since the languages which are expected to ac- 
count for a majority of the load on the machine require 
subscripts to be checked for size before being used, it would 

; be nice to have a cheap and convenient way of doing this . 
Furthermore, we have to deal with arrays having elements 
which may occupy 1 (integer), 2 (real) or 4 (double) words. 
To have to multiply the index by the element size is a great 
annoyance . 

4) References to fields which occupy whole words or parts 
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of words relative to a pointer are also common, especially 
in system code . 

5) It is essential to have an efficient mechanism for 
handling strings of 8-bit characters. If other byte sizes 
can also be accommodated, so much the better. 

6) We want to leave most of the 930 addressing capa- 
bility in, so that it will be easy to convert 930 programs 
to run in normal mode. 

All of these goals are achieved in a fairly economical way 
by the addressing system of the Model I. In particular, 
arrays, strings, and part-word fields are handled by in- 
direct addressing, which allows an absolute 18-bit address 
to be supplied. The addressing modes available in an in- 
struction allow for immediate operands, addressing relative 
to the instruction word for referencing the program, and 
addressing relative to two base registers which are in- 
tended to reference the local storage of the subroutine 
(called the local environment, L) and the global storage 
of the whole program (called the global environment, G) . 
they also permit indexing to be specified from the X register 
or from the first few cells of the local or global enviro- 
nment. 

It should be obvious by now that the addressing system is 
designed to be used by programs which are organized in a 
very definite way, i.e. into a collection of subroutines 
or functions (of less than 4K words each), each with local 
storage (of less than 2K words for scalars), and all with 
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access to a single global storage and communications area 
(of less than 16K words) . The first 123 words of the local 
and global environments are special; this is because there 
are 8-bit fields in certain addresses in which the top bit 
specifies L or G and the remaining 7 bits address one of the 
first 128 words. The first 32 words are even more special, 
because there are 6-bit fields which address these words , 

With this introduction, we proceed to describe the addressing 
in detail, together with comments on the intended use of 
each feature. A reader unfamiliar with this material will 
find it helpful to read the text following the description 
of each mode first . 

The 3-bit TAG field of an instruction determines one of 8 
addressing modes . 

These are TAG NAME ADDRESSING MODE 

D Direct 

.1 I Indirect 

2 X " Indexed 

3 BX Base- index 

4 PD Pointer-displacement 

5 IPD Indirect-pointer- 

displacement 

6 BXD Base- index-displacement 

7 ■ ' REL Relative . This one has 6 
: sub-cases 

IM, IMX Immediate, ordinary and 
indexed 

LR, ILR L-relative, direct and 
indirect 
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SR, ISR Source-relative, direct 
and indirect 



Most of the modes depend on the existence of an indexing 
register IR, and a source register R. The IR register is 
not to be confused with the index register X. In fact, it 
is not part of the state at all; i.e. its value does not 
have to be preserved from one instruction to the next. The 
IR is used to hold the 18-bit value which will be used when 
an indexing operation is called for by the addressing system. 
It is initialized from X at the beginning of each instruction. 
Thereafter, it may be loaded from a word specified by a 
BX or BXD mode or an array indirect word (see below) . 
The source register is initialized to the address of the word 
from where the instruction has heen fetched (normally P) . 

Some addressing modes (the ones which do not have indirect 
in the name or I in the abbreviation) compute Q directly 
from the information in the central registers, the instruc- 
tion and possibly one memory word used for indexing. Others 
■ (the indirect modes) compute directly the location of an 
indirect address word , and the contents of this word then 
determines how the addressing computation is to proceed. If 
indirect addressing is specified, only the values of the 
IAW address and IR affect the subsequent address computation . 
We will therefore confine ourselves to specifying these values 
which describe instruction addressing, and leave the details 
of indirect addressing for later treatment. 




CONTENTS (N) will be used to denote the contents of 
the memory location with address N. Ring checking is per- 
formed with R as a source and N as target. 

Direct (D) : Q <- W -f G; OP «- CONTENTS (Q) ; Note: W is 
the address field (bits 10 - 23) of the instruction. 
In direct mode, the effective address is given by the 14-bit 
address field relative to G. This permits direct addressing 
of the first 16K of the global environment. The notation is 
LDA G' [W] 

Indirect (I) : IA(W + G) ; 
In indirect mode, any of the first 16K words of the global 
environment can be used as an IAW. The statement IA (X) 
implied that the indirect addressing sequence is initiated; 

FUNCTION IA(X) ; ^ 

IAW <- CONTENTS (X); R «- X; 
* PROCEED TO PROCESS IAW 

By the time it is finished, it will set the value of Q or OP. 
The notation is LDA $ G* [W] 

Indexed (X) : Q <- W + IR; OP <- CONTENTS (Q) 
Since IR is initialized to X, the effective address is the 
(18-bit) sum of the index register and the address field. 
There are two ways to look at this addressing mode: 

1 - X contains a pointer and W is a displacement relative 
to this pointer 
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W is an address (in the first 16K) and X is a dis- 
placement . This interpretation is unsatisfactory for 
programs which exceed 16K in size, and is not expected 
to be much used . 



The way to code the 93Cf*s 

BRU *,2 

so that it will work anywhere in the address space is with 
indirection (see below) through a normal IAW with source- 
relative indexed addressing. 
The notation is LDA X* [W] 

These are three of the four addressing modes available 
on the 930. The fourth, indexing and indirection, is not 
available in normal mode on the Ml, since it was judged 
less useful than any of the 5 new modes; it can be obtained 
with IPD mode (see below) if the offset relative to X lies 
between -40 B and 37B. ;'-' 

Pointer-displacement (PD) : T <- W [16, 23] ; 

U «- IR IF T=0 ELSE CONTENTS ( 
G + T IF T<200B ELSE 
L + T - 200B) 7 

• T *- W [10, 15J ; 

V <- (T IF T<40B ELSE T - 100B); 

Q «- U + V? 

OP <- CONTENTS (Q) ; 



First there is some new notation here. W [10, 15] means bits 
10 to 15 of W (the address field of the instruction) con- 
sidered as a 24-bit number (with 18 zeros on the left, in 
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this case) ; 

In this mode the address field is divided into an 8-bit 
pointer address (PA) and a 6-bit signed displacement. 
Similar arrangements are used in several other modes; they 
will be explained here in detail . The top bit of the 8-bit 
pointer address specifies the environment (l^local, 0- 
global) and the remaining 7 bits address one of the first 128 
words in the local or global environments. If PA is 0, the 
contents of IR ? rather than of word in G, is specified . 
It is this decoding which is specified by the argument of 
CONTENTS. The calculation of V specified the conversion of 
a 6-bit number which is to be interpreted as twos -complement 
into a 24-bit twos- complement number. 

Finally, the effective address is the sum of the pointer - 
specified by PA and the displacement. The typical use of 
this mode is in addressing the nth word of a table entry 
given a pointer to the start of the entry. If the pointer 
P is in the first 128 words of either environment, then the 
word is loaded into A, say, by 

LDA P[n] 
which is the notation for PD addressing with pointer ad- 
dress P and displacement n. 

Another way to use this mode is to reference non-local 
variables in a block- structure language. Assuming that 
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each block requires no more than 64 words for its storage, 
we proceed as follows . When a new block is entered, set 
up in its local environment a pointer to word 3 2 of the 
storage area for the latest incarnation of each lexico- 
graphically enclosing block. Then, if X occupies word 4 
in block F, whose storage is pointed to by local environ- 
ment word 12, we reference X with 

LDA L' [12] [44B] 
The displacement of 44B is -28 from the pointer, which 
addresses word 32 of the storage for F. So the word of F's 
storage actually addressed is 32-28=4, as required. If a 
block has more than 64 words of scalar s, it can be assigned 
several pointer words in the local environment. 

* Indirect-pointer-displacement (IPD) : 

tJ and V are computed as for PD mode 
IA (U + V) ; 

This is just indirect addressing in PD mode. All of the 

direct addressing modes have indirect counterparts, for 

obvious reasons. 

Notation is LDA $P [n] 

Base-index (BX) : T^W [16,23]; 

V«-IR IF T=0 ELSE 

G + T IF T<200B ELSE 
L + T - 20QB; 

T«W [10, 15] ; 

IR<-IR IF T=0 ELSE CONTENTS ( 
G + T IF T<40B ELSE 
L + T - 40B) ; 

. IA(V) ; 



n 
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This is the array accessing mode and is written 

.LDA B [I] 
where B is the base and I the index. The 8 -bit and 6 -bit 
index are both treated as local or global environment 
addresses, exactly like the pointer address in PD mode. 
The index is put into IR and the base specifies an indirect 
word. If an array is being accessed, B will address an 
IAW which has the 18-bit base address of the array and 
specifies indexing. The contents of IR, which was loaded 
from I, will thus be added to the base address of the 
array to determine the final 18-bit address, which is just 
what we require for array referencing. This is not, however, 
the whole story; the rest will be told when we come to con- 
sider the indirect addressing type used for arrays. 

Base-index-displacement (BXD) : 

T <- W[16,23] ; 

U «- IF T=0 ELSE CONTENTS ( 
G + TIF T<200B ELSE 
L + T - 200B) ; 

T <~ W[10, 15] 7 

V «- (T IF T<40B ELSE T - 100B) ; 

T <- IR; 

IR «- U + V; 

IA (T) ; 

This mode is similar to BX. It assumes that the base is in 
the IR. The field thus freed is used to provide a displace- 
ment (anything from -32 to +31) of the index. Thus to load 
B [1+5] we would write 

EAX B 

LDA ($X*> [I + 5] ; 
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here I is the index, 5 the displacement. See the discussion 
of arrays below for more details . 

Relative (REL) : There are 6 sub-cases, depending on the 
first three bits of W. 
Thus: 



Name 



wriO, 12] 



Irrelative (LR) 



Indirect L-relative (ILR) 







Source-relative (SR) 



2, 3 



Indirect source-relative 
(ISR) 



Immediate, indexed (IMX) 



4, 5 



Immediate (IM ) 



Description 



U <- W [13 , 23] ; 

Q *■ L -f- U; 

OP *■ CONTENTS (Q) ; 

Compute U as above, 
then : 

IA (L + U) ; 

T ^ W [12, 23] ; 

V *■ (T IF T<4000B 

ELSE T - 10000B) ; 
Q <r R + V; 
OP -c- CONTENTS (Q) r 



Compute V as above, 
then: 

IA (R + V) 
Compute U as IM, then: 

OP. <- U + IR; 

T -^ W [13, 23] 7 

U <- (T IF T<2000B 

ELSE T - 4000B) ; 
OP «- U; 

Note that Q is not 
defined by the IM or 
IMX addressing modes. 
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The immediate mode permits signed constants in the range 
-2000B to 1777B to be provided as operands without an addi- 
tional memory reference. For instructions which store or 
which expect an operand longer than 24 bits this mode is 
a mistake. The action taken if it is used erroneously is 
a TI trap. The notation is LDA I 

The L-relative mode permits locations in the range to 
3777B relative to the local, environment to be addressed. 
It comes in two flavors to permit direct or indirect ad- 
dressing. The address computation is similar to that for 
source-relative addressing, except that the sign bit of 
the displacement is taken to be 0. 

This mode allows 2048 words of local environment to be 
addressed directly. This should be more than enough for 
all the scalar storage of a routine. It will not, of course, 
be enough for the arrays, but they are all expected to be 
addressed by indirection, so there is no problem. 
Notation is LDA L* [D] or 

LDA $L* [D] for indirect 

Finally, the source-relative (or R-relative) mode permits 
locations up to 4000B on either side of the instruction or 
indirect word to be addressed. This allows routines to be 
placed anywhere in memory without modification and to address 
themselves without difficulty, as long as they are not more 
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than 2048 words long. The intended programming style is 
small functions connected to each other only by function 
calls, returns and error returns, all of which are taken 
care of by the BLL instruction described below. This 
limitation should therefore not prove to be a problem. 
Notation is LDA R* [D] or 

LDA $R' [D] for indirect 

It was recognized that addressing relative to the start of 
the routine A rather than relative to the source R, 
would be better in some instances . This mode was not 
provided because it would have required another word in 
the state to record the start of the program, together 
with machinery for keeping it updated . 

Indirect Addressing: ~ 

To prevent infinite loops of the indirect mechanism, a trap 
ILIM will occur if indirection through more than 16 levels is 
attempted . 

There are four types of indirect addressing: normal, field, 
string, and array. The type is selected by the first two 
bits of the word. The intended use of each type is sug- 
gested by its name and will now be explained in detail . 
Normal : the IAW has the form 

BITS NAME CONTENTS ^_^ 

0-1 TYPE 
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5 


TRAP 


6 


RELX 


7-23 


LWR 


6-23 


LW 


10-23 


W 



2-4 TAG interpreted exactly like an instruc- 
tion TAG 

causes trap IATRP is set 

causes indexing for the relative 
modes 

long address for the relative modes 

long word address 

word address 

If TRAP is set, the IATRP trap is caused, and R is passed 
as its argument. Otherwise, TAG and W are interpreted 
as in an instruction word, with three exceptions: 

1} if TAG = D, I, or X, LW is used in place of W, and 

G is not added. In other words, an 18-bit absolute 

address is supplied. 

2) if TAG = REL, IR is added to the addresses computed 
by L and R-relative modes if RELX is set. I.e.," 
indexing is possible with these modes. Also, the 
3-bit subtag is found in bits 7-9, thus allowing the 
CR, ILR, SR, and ISR offsets to be 3 bits longer. 

3) if TAG = PD or IPD, the mode is read-only direct 
(ROD) or read-only X -relative (ROX) respectively. 

These behave exactly like D and X modes except that 
an attempt to store will cause the ROIA trap with 
R as parameter. 

Normal type permits any word in the address space to be 
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addressed directly. It is generally used for pointers and 
for the addresses of arrays. Note that although the capa- 
bilities are almost identical to those provided hy an in- 
struction address, the format is quite different. It is 
not possible to use an instruction as an indirect word. 
It also permits indexing of a L-relative or source-relative 
address, so that arrays in the program or the local en- 
vironment can be addressed conveniently. 

Field: the IAW has the form 

1 

size of field in bits 

address of first bit of the field 

.causes sign extension of the field if 
set 

13-23 DISP 2's complement signed displacement 

FIELD: Q «- IR + DISPL; 
U <- CONTENTS (Q) ; 
OP ^ U [FB, FB + SIZE - 1] ; 
OP <- OP - 2t (24-FB) IF SE = 1 AND OP [FB, FB] =1; 

The field which is SIZE bits in length and which starts 
at bit FB in word DISP + IR is referenced. Both FB and 
FB + SIZE - 1 must be _£23 . If they are not a TI trap will 
occur. If SE is set, the leftmost bit of the field (bit 
FB at DISP + IR) will be extended into bits through 
22-SIZE of the resulting operand. DISP is taken as a 
2's complement number, in the range -1024 to 1023. 



0-1 


TYPE 


3-7 


S IZE 


8-12 


FB 


2 


SE 



t 



p/c-n.r 

MICPU/M-4.2 



page 
25 



The idea here is that IR contains a pointer to a table 
entry, and that the field descriptor (the IAW) specifies 
a group of bits at some definite location in the entry. 
Typically, the pointer might be in PTR within 3 2 words 
of L and the field descriptor in F within 128 words of 
G. Suppose the contents of F is 

FIELD 3: 6, 12 

or in octal DATA 2346000 3 B 
then we might write 

LDA F [PTR] 

using base- index addressing. Since PTR appears in the 
index field, its contents is put into IR. Then F is 
taken as an IAW. Since it is of type field, it accesses 
the word at IR -f 3, which is CONTENTS (PTR+3) ; i.e., the * 
fourth word of the object pointed to by PTR. Bits 6-12 
of this object will be loaded into A. If the word . addressed 
was 01234567B, then A will contain 47B. The field can be 
used as an operand in any instruction which accesses a 
single-word operand, regardless or whether it is a load or 
store. Note that fields cannot cross word boundaries. 

String: the IAW has the form 

0-1 TYPE 2 

2-3 CSIZE character size: = 6 bits, 1=8'/ 2=12, 
* . 3=^24 

4-5 CPOS character position in word 
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6-23 WA word address 

The character at the indicated position in the word addressed 
by WA is referenced. The following table defines what bits 
are referenced by the 16 possible combination of CSIZE and 
CPOS . 



CSIZE/CPOS 





1 


2 


3 





0-5 


6-11 


12-17 


18-23 


1 


0-1 


8-15 


16-23 


X 


2 


0-11 


12-23 


X 


X 


3 


0-23 


X 


X 


X 



Combinations marked X in the table will cause a TI trap. 

The bits referenced are treated exactly like the bits 
selected by a field IAW. 

This type of indirection allows one byte in a string to 
be referenced. The instruction ISD increments the des- 
criptor to point to the next byte, which may then be 
referenced, It has the additional feature of setting 
the condition code depending on whether the descriptor 
is equal to the next word or not. The string type and 
this instruction are intended to be used with four-word 
string descriptors. The first word points just before 
the first byte allocated for the string. The second 
word (read pointer, RP) points to the first character 
of the string, the third word (write pointer, WP) to 
the last character. The fourth word points to the last 




byte allocated for the string . To read the first char- 
acter, increment RP with ISD, then indirect through it. 
The case of no characters left can be detected by the 
abnormal CC setting , To write a character, increment 
WP with ISD and then store indirect through it . Over- 
flow of available storage can be detected by the CC 
setting. 

Array: an array descriptor is two words long. Its 
form is: 
0:0-1 TYPE 3 

0:2 LB lower bound for IR (0 or 1) 

0:3 ATRAP array trap bit 

0:4 LEB large element bit 

0:5-6 MULT IF LEB = multiplier for IR 

0:5-10 MULT IF LEB = 1 

0:7-23 UB IF LEB = upper bound for IR 
0:11-23 UB. IF LEB = 1 

If IR<^LB or IR)>UB, trap ABE occurs, with R as parameter. 
If ATRAP=1 in I AW and the instruction is not LAX, or 
ATRAP=0 and the instruction is LAX, trap IATRP occurs with 
R as parameter. 

otherwise, IR <- (IR - LB) * (MULT + 1); T *- R + 1; 
NORMAL IA (T) ; 

This is the most complicated of the IAW types. It is in- 
tended to accomplish the following functions connected 
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with array accessing: 

1) Allow or 1 as lower bound 

2) Perform a bounds check on the subscript 

3) Multiply the subscript by the size of the array 
element, allowing for sizes up to 63 . 

4) Check that the number of subscripts supplied is 
the number expected (see below) 

5) Provide an 18-bit absolute base address for the 
array. 

Arrays are intended to be stored with marginal indexing . 
Thus, the 2x3 Fortran integer array A would appear as 
follows: 

A = 



3 1 


2 


2 




T 





y 



3 111 



^ 



3)1111 



A 


(1, 


1) 


A 


(1, 


2) 


A 


(1, 


3) 


A 


(2, 


1) 


A 


(2, 


2) 


A 


(2, 


3) 



(The three 2-word descriptors are array indirect words) 
The LAX instruction works just like EAX, except that it 
merges an I tag into XR[2,4] (leaving a normal IAW which 
specifies indirection) and treats the TRAP bit in an array 
descriptor as though it were complemented . 

Then to do B <- A [K, L] we would write 

IAX A[K] (BX addressing) 

which leaves the address of the descriptor for the Kth 
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(BXD addressing) 



row in X followed by 

LDA ($X')[L] 

STA B 
The second subscript can have a constant displacement with- 
out complicating things: 

B «- A [K, L-4] becomes 

LAX A[K] 

I^A ($X')[L~4] 

STA B 



If the first subscript has a displacement, there is a compli- 
cation, since there is not enough room for three operands in 
one instruction. 

B <- A[K+1, L] becomes 

EAX A 

LAX C$X , )[K+1] 

LDA ($X')[L] 

STA B 



A singly subscripted array can be accessed without any 
extra instructions at all provided the subscript is a 
variable which can be accessed with an I field. If M 
is a 10-element integer array, it is allocated thus: 



/PS ;f* 
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M= 



TUTT 



10 



■^ 



M (1) 


M (2) 


M (3) 


M (4) 


M (5) 


M (6) 


M (7) 


M (8) 


M (9) 


M (10) 



and N <- M[J] becomes 
LDA M[J] 
STA N 

If the array is integer (1 word items) and bounds checking 
is not required, the descriptors can be changed to normal 
indirect words which specify indexing, and no change is 
required in the instructions of the program. 

The purpose of the peculiar behavior of LAX in the case of 
traps is to check that the proper number of subscripts is 
. provided to an array. The trap bit should be set in the 
array descriptors except at the last level (the des- 
criptors which point directly to the data) and clear 
there . 
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tjse of Addresses by Instructions 
: All instructions compute an effective address Q and/or an 
Operand OP as described above. The use of these quantities 
once they have been computed, and in particular the error 
conditions which may arise, depend on the address type of the 
instruction. There are four address types: 

1) Fetch type (F) 
These instructions will accept any kind of address . They 
make use only of the 24-bit OP value . 

2) Effective-address type (E) 
These instructions make use only of the effective address Q, 
ignoring OP. Immediate addressing causes a TI trap if used 
with these instructions .■ Q is ring-checked with R as a source 
before use; if the check fails a trap MA.CC will occur. 

3) Store type (S) 
These instructions make use of the effective address Q and 
the operand OP. If the address calculation terminated with 
indirection through a field or string descriptor, the FB and 
SIZE (for a field) or CPOS and CSIZE (for a string) define 
a group of bits, say bits i to j . An S type instruction puts 
bits 23-j+i to 23 of the word to be stored into bits i to j 
of the word addressed by Q, leaving the rest of this word 
untouched. Immediate addressing causes a TI trap and 
indirection through a read-only direct or read-only indexed 
word causes a RO trap. 

^) Double - store type (D) 
These instructions make use only of the effective address Q 




: They trap under the same conditions as S-type instructions. 
Note that they are not affected by field or string indirection. 

Legal combinations of instructions and addresses are summarized 
in the following table: 

Immediate 

Indirection through ROD or ROX 

Anything else 

Instructions of types S or D will give a PRO trap if Q (or 
Q+i for instructions which reference double (i=l) or 
quadruple (i=l,2,3) words) addresses a read-only page. 



F 


E 


S 


D 


ok 


TI 


TI 


TI 


ok 


ok 


RO 


RO 


ok 


ok 


ok 


ok 




Function Calls 

A rather elaborate mechanism for calling functions and return- 
ing from them is provided in the hardware of the machine , 
The purpose is to include all the capabilities required by 
the FORTRAN and SPL languages directly in the hardware, so 
as to make software interpretation unnecessary. This is 
considered extremely important, since programs are expected 
to be written in small modules, and functions calls and 
returns are consequently expected to be very frequent. 

The basic features of the call instruction BLL are as follows: 

1) The old P-counter and local environment are saved and 
new ones picked up. 

2) The new local environment may occupy a fixed area, or 
it may be allocated space at the end of a stack defined by 
two locations in the global environment . There is a check 
for stack overflow. 

3) The caller provides a list of parameter addresses. 
The called function specifies for each parameter whether he 
wants the address, the value or both copied into his local 
environment. If he requests copying of the value, he spec- 
ifies whether it is 1, 2 or 4 words . 

4) He also specifies whether or not a parameter is an 
array. The calling program tells whether -it is passing a 
scalar variable, a scalar value (stores are not legal), 

an array or an array element (subscripted array) . These 
distinctions permit all the checking for proper matches of 
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arrays with scalars required by FORTRAI to bo dons aulom-: Lie- 
ally. The case of an actual parameter which in an array 
element corresponding to a formal parameter which is; an array 
requires software! handling and is trapped so that this may 
be accomplished. 

5) The calling program may pass labels v/hich are relative 
to the start of itself. The call automatically supplies the 
current value of this local 'environment to convert them into 
return descriptors, and records in each local environment the 
start of the program so that the relative address can be 
converted to absolute when they are used. 

6) Provision is made for an argument to be passed in the 
central registers. 

A number of these points are somewhat subtle and cannot be 
properly understood unless explained in complete . detail, 
which we now proceed to do. r ~' 

The BLL instruction addresses a branch descriptor, which is 

a two-word object with the following form: 

Word Bit Name Meaning . 

0-23 NEWPW This word looks like a veal; IAW. * 

Its effective address is computed. 

c.f. REL +SR in Normal I AW 

Causes TRP if set 

Signed displacement if SREL is set 

Long word addresses 

Call bit. The old P and L are saved 
if the bit is set. 

StK The local environment is allocated , 

from the stack if this bit is set. j 






4 


SRE 





, 5 


TRA. 





S-23 


SRW 





6-23 


LW 


1 





CLL 
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1 ■ 2 CPA Arguments are copied if this hit 

is set. 

1. 3 CPR IF The CPA hit in the return descriptor 
CLL-1 is turned on if this hit is set. 

I 3 UWSTK IF Unwind -stack on return. 

CLL=!2f 

1 5 FTN 1 FORTRAN type function 

1 6-23 E This number determines the new Im- 

precisely how it does so depends 
on STK and REL. 



When the BLL is executed, the first step is to compute the 
-effective address of NEWPW (which is LW if SREL is 0. other- 
wise the sign -ex tended SRw + the address of the NEWPvtf) , This 
18-bit number is saved in a temporary register called NKWP; 
after undergoing further processing it will become the new 
P~counter . The following steps remain to he performed: 

1) Obtain new local environment. 

2) Copy arguments. 

3) Compute return descriptor (for CALL) and save It 
in first two words of new local environment. 

4) Transfer control. ' ■ ' 

We treat them in the order written, which is also the order 
in which they are performed. In describing what happens, 
we shall nuike use of a number of temporary registers or 
variables (such as NEWP, which was Introduced above) . 
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1} If STK=$, the E field of the descriptor is taken 
as the new value of L ; which we call NEWL. In this case, the 
function being called is said to have a fixed local environ- 
ment. Such a function cannot be recursive, and space must 
be allocated for its local environment at all times. On 
the other hand, the contents of such a fixed environment is 
normally preserved between function calls . A FORTRAN 
function has a fixed environment, for example. Since a call 
(CLL=1)' saves the current L in the E field of the return 
descriptor, the return (CLL=0) handles E exactly as the call 
of a fixed function does. 

If STK=1, space for the environment is allocated on a stack. 
Two words are required to describe the stack, which grows 
toward increasing memory addresses: ...... ~;. 

SP, the address of the first unused word, kept in 

G'[2],the third word of the global environment. 
SL, the address of the last word allocated for the 
stack, kept in G'[3] . 

If the environment is stacked, different actions are required 
for calls and returns. 

On a call (CLL^l), we compute SP+E. If it is>SL, the 

STKOV trap occurs. Otherwise, NEWL<-SP and SP^sp+E. 

In other words, E locations are taken from the too of the 
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stack. The situation before and after is shown in figure 1. 

On a return (CLIj-0) what ordinarily happens if STK is set is 

SP<~L7 NEWL^-E; 
in other words , the old L at the time of the call (which was 
saved in the E field of the return descriptor, as we will 
see} becomes the new L, and SP is reset to the value it had 
before the call, which is the current L. The before and 
after pictures of figure 1, looked at in the opposite order, 
should help to clarify this. With these rules, calls can 
be made freely from fixed environment functions to stacked 
environment ones and vice-versa. The industrious reader 
may check the four cases . 

Unfortunately, if the return is to a function which is not 
the one which called the current one, SP is not reset cor- 
rectly. This is expected to happen only as the result 
of a branch to a label which has been passed as a parameter 
(i.e. an error return). When such a parameter is passed 
(see. below) from function Fl with L=L1 to F2 with L=L2, 
and the descriptor for the call has STK set, the parameter 
appears in F2 as a BLL descriptor with STK set, UWSTK set 
and L2 in E (see figure 2) . The return (BLL) sees CLL=J#, 
STK=1, UWSTK=1 and does 

SP. <- E; NEWL = the E field of the descriptor addressed by E 
This trick allows both SP and L to be set correctly while 
carrying only one number in the descriptor. 
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Figure 1: Allocating a local environment on the 
stack during a call 
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non-local label 
passed by Fl: 



STK.UWSTK L2 

• i . i . < 



P in Fl 



return descrip- 
tor from call 
of F2 



L(n-l) 



P(n~l) 



STK LI 



PI 



BEFORE 



SL 



SP 

Local 

environment 
for Fn 



Ln 



Local 

environment 
for F2 

L2 

Local 

environment 

for Fl 

LI 



Start of 
stack 



SL 



SP 



LI 



AFTER 



Figure 2 : Return to non-local label in Fl passed 

as a parameter 
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It words regardless of whether Pi and Fn have fixed or stacked 
environments, but requires F2 to have a stacked environment. 
When a labsl is passed to a routing which has a fixed 
environment, therefore, E is set to Ll and STK, REL turned 
off. If additional space is allocated on the stack after 
the call, it will not be freed when a branch is made to this 
label. It is believed that rthis deficiency is not very 
serious . 

2} If CPA=l a arguments are copied whenever a BLL is 
executed. If a function has multiple results., it can turn 
CPR on in its descriptor. This will cause CPA to be 
turned on in the return descriptor, and the multiple results 
will be returned. by the arguments - copying process when 
the return is executed. If CPh-0 , the BLLERR (2) trap 
occurs. A summary of all BLLERR traps and their parameters 
is given in the appendix. The BLLN instruction should be 
used if no arguments are being passed; in this case the 
trap will -occur if CPA-1 . 

The address of (actual) arguments to be copied are specified* 
in the calling program in a list of actual argument words 

(AAWs) following the BLL instruction. These have a one-to- 
one correspondence with a list of fo rmal arguments words 

(FAVTs) which starts at KEWP . 



PA'-.-m 



MICPu/M-4.4 



An argument word is formatted like rn insinuation. The sddrcc- 
sing is interpreted exactly like the addressing for an instruc 



tion, b; 



follows 



c a 



ie 7 -bit opcode field is treated differently, as 



Bits 
3-4 



5-8 



Name 
STR 



CADDR 



FSTR 



TYPj 



EMDF 



Contents 



(actual argument only) struc- 
ture 

1 = variable 

3' = computed scalar 

2 = array element 

— array 

(forraal argument only) copy 
value 

1 = copy address of 

actual argument 

= copy value of 

actual argument 

(forraal argument only) 

1 = scalar 
- array 



type 

1 
2 
3 
4 
5 
6 
7 

"a 

9 

14 







j ump ( a c tu a 1 ar 
ment only) 



= integer 
= long 

— real 

= double 

- complex 

— long long 
-= string 

= label 

- pointer 
= unknown 



wora 

word 
word 



(1 
(2. 
(2 

(4 word. 
(4 word 
(4 word 
(4 word 
(2 word 
^ 1 wora 



qu- 



) 



s) 



s) 



end flag 

J2T = not last argument word 
1 = last argument word 



Argument copying proceeds as follows: two pointers are 
initialized: 

next forraal Eirgument word' (NFvv) initialized to KtrT 



ne 



r, 1 



argument word (>1A r ;7) initialized to P ■!. 1 



J 
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Then FAV7 <• CONTENTS (NEW) , and FAW is treated as an. instruct: 
word' for the purpose of computing its effective address, wh:l c 
is put into FQ. Only D or LR addressing is permitted; any- 
thing else v ill cause the BLLERR trap with class 4, 

If ENDF (FAW) = NEW <- NFW + l'and copying continues. Other 
wise, copying stops. If the instruction is BLL, the BLLERR (2 
occurs. If it is BLLN go to step (3). 

We treat NAW as we treated NFW: AAW <- CONTENTS (NAW) , R<-NAW 
and its effective address is computed. The ad dress type is 
F. if TYPE ~ 1 (integer) otherwise E . BLLERR (5) will occur 
if the address type is not satisfied. 

If type (AAW) = the AAW is a jump and its address specif ies 
the next actual argument. Repeat from AAV? <~ CONTENTS (NAW<-Q) , 
etc . 

If the AAW specified G-relative addressing with an address 
of it is taken to refer to the central registers. If CVAL 
/- then BLLERR (5) or if TYPE> 6 or STR = then BLLERR (4) 
will occur. 

Next the types are checked. If TYPE (FAW) = TYPE (AAW) , the 
BLLERR (3) trap occurs, unless one and only- one of them is 
unknown. FSTR and STR are checked according to the following- 
table: 

FSTR STR 1 2 3 

OK BLLERR (3) FTNAT BLLERR (3) 

1 FTNAT OK OK OK 

FTNAT means that if FTN = 0. BLLERR (3) occurs, otherwise the 
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FTSAT bit is set ; which will inhibit the skipping of one \;ord 
in step (4) » 

The idea here is that if A(I) appears as an actual, argument in 
FORTRAN and the corresponding formal B is dimensioned, an 
array descriptor for B must be computed, or if A appears as an 
actual argument and the formal is a scalar, the first element 
of the array must be found. A software routine is supposed 
to do this. It needs access to the descriptor for A; the 
e>:tra incrementing of NAW is to leave room for the address of 
the descriptor. 

Now copying takes place. If CADDR(FAW) - 1, Q is stored at FQ. 
as an absolute IAW, or except in the following two cases; 

If the AAW supplied an immediate operand or if it is 
stored into FQ as an IM type Normal I AW, 

If Q is the result of RO? or ROX addressing or STR 
(AAW) =3, Q is stored as a read-only absolute (ROD) IAW. 

Otherwise (CADDR(FAW) = 0) the value must be copied. The 
details of this depend on the type: 

If TYPE = 1 and STR (AAW) ^ 3 OP or the A register (in 
the special case) is copied to FQ. 

For TYPE < 6: and STR(AAW) ^ 0, the number of words 
specified above is copied from Q to FQ, or from the central 
registers (A, B, C and D) to FQ if appropriate. 

If TYPE = 3 or TYPE = 4, the floating point number ad- 
dressed is examined. If it is undefined (see Floating Point) 
the trap UF1J will occur. In case the central registers are 
used, storing is performed as in the floating point store 
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(STF) instruction. (Reefer to Fl_oat_in5_ Pjoint . ) Note that 
TDFL2\G has to be set in accordance of the TYPE as the number 
of words stored by STF depends on it, 

For TYPE = 7 and STR(AAW) } A 0, the four-word string 
' descriptor is copied. If the BL-L being executed is a sy_stem 
call (as described later), four ring checks are done, with P 
as source and each of the four word addresses as target. 
Furthermore, the word address must be non-decreasing from one 
word to the next, and the COPS and. CSIZE fields of the first 
word are copies into the others. Finally, 2 is forced into 
the top two bits of each word to ensure that it is a string 
descriptor. 

For TYPE = 8 and STR(AAW) /- a label is copied as 

follows: 

The first word, is made absolute, i.e. Q added to the 
sign-extended SRW becomes the new LW if SREL is set, then SREL 
is cleared. 

In the second word if bits 6-23 are 0, the word is re- 
placed by L if STK = 0. 

NEWL 4- the STK and tWSTK bits, if STK - 1 

. The basic idea is to supply the proper context, so that the 

current local environment will be restored if the label is 

branched to., Refer to the discussion of how to unwind the 



stacK -to 



ee why NEWL is used when STK - 1 



If the label is passed by a system, call, the absolute 
address in the first word is ring -checked . Before copying 
the second word CLE, STK and REE are cleared and "h;i tr. 6-23 ar. 
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If they arc not 0, BLLF.KR(6) occurs. 



For STR(AAW) = the type is ignored * An array descriptor 
is also copied like a two-word scalar, except that the second 
word W2 is replaced by an X or ROX I AW with address equal 
to the effective address which results from treating W2 as 
an IAW. This permits an array descriptor which uses relative 
addressing to be passed as a parameter, since the relative 
address is automatically converted to absolute. If BLL is a 
system call, in addition two ring checks are done with P as 
source and both the first and last words of the array as tar- 
gets. This means that if an array descriptor is passed to a 
higher ring, the higher ring can use it without fear of ac- 
cessing storage which the calling program could not have 
accessed. 

When the address or value has been copied, ENDF(AAiv) is coin- 
pared with ENDF (NAV7) . If they differ, BLLERR(2) occurs. If 
both are 0, copying continues with 

NAW <- NAW -f 1 ; NFW <- NFW + 1 ; 
otherwise it stops. In the latter case NEWP <- NDW -v 1 

3} If the CLL bit is on, a return descriptor is computed 
and stored at NEWL. It consists of 2 words: NAW + 1 

Note that this is the return address 

L -V IB 7 *CPR + 2B7 *STK 

i.e., the old loccil environment, with STK on if it is on 
in the descriptor, and CPA on if CPR is on in the call 
descriptor. 




MICPU/K-4.4 46 

4) Set L to NEWL, P to NEWP, and continue execution. If 
the FTN bit is set, skip one word unless the FTNAT flag is on. 
The instruction skipped presumably will contain a subroutine 
call to take care of the special cases in FORTRAN mentioned 
earlier . 

In order to state precisely and concisely how this instruction 
works and to describe the details of ring-checking, an SPL 
program is presented in the Appendix which duplicates its 
functioning. This program uses some special functions. 
(Those not mentioned here refer to fields of functions defined 
elsewhere in this document) . 

1) The construction $X«- implies a ringcheck with R as 
source and X as target. A,s the access is a store, the trap 
PRO may also occur. 

2) RINGCHECK (X) performs a ring check with R as source 
and X as target. If the check fails, trap MACC will occur. 

3} RING(X) produces a number depending on the ring 
which contains X, say 

1 if X is in the user ring 

2 if X is in the utility ring 

3 if X is in the monitor ring 

• 4} MEHTERO, MEXIT () and INTERRUPT ( ) designate the 
places where the actions described under "CPU Interrupt- 
ability" are taken. 

5) EA(X) initiates the effective address calculation 
similar to IA(X) , but the format of CONTENTS (X) is like an 
instruction (or an AAW) rather than an IAV7. 
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Programmed Operators 

If the P bit of an instruction is 1, it is interpreted as a 
rather peculiar kind of subroutine call rather than an 
ordinary machine instruction. Execution proceeds as follows: 

the OPC field of the instruction is put into IR 
a BLL $G* [0] is executed 

^Presumably word of G will contain the address of a trans- 
■' fer vector. If desired, it may contain an array descriptor 
which ' limits the number of programmed operators and supplies 
a multiplier of 2 . 

There is one additional feature: BLL will initialize NAW 
to P, rather than to P + 1, so it will use the instruction 
word as the first AAW . STR, TYPE and ENDF will be taken from 

It*?'**: ■ 

...the corresponding bit positions of the first FAW. 
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System Calls 

Two versions of the OPR instruction provide protected eni 

points into the system, The jVICALL instruction works as 

follows: 

8 bits provided by the OPR are put into IR 

a BLL $BA is executed, with BA = 604000B 

when the BLL is completed; 

G <- NEWG, where NEWG = 600000B. 
The intention is that 604000B should contain an array 
descriptor v/ith 

LB = 



UI 



total number of defined system calls 



■MULT = 2 
which points to an array of BLL descriptors for the vario 
protected entry points. Note that if the system call inv 
a ring crossing, where the called system is in a higher r: 
than the caller, G is saved in NEWG [14] . G is restored f: 
G'[14] by an^ BLL (BLLN, POP etc.) which crosses the ring 
boundary into a lower ring. 

For calls into the utility the UCALL version of OPR works 
same way, except that BA = 4030163 and NEWG = 403000B. Nc 
that this is the beginning of the utility ring. Variants 
these OPRs exist which execute a BLLN instead of a BLL. 
(MCALN, UCALN) 

The PDF LAG, TDFLAG bits in the status register are cJearc 
by both MCALLs and UCALL s. 



MCALLs also set the LOCKED bit of the 



\Q ifu as described 
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under "CPU iiit.erruptab.il ity. " 



A machine trap is a forced transfer of control v/hich may occur 
as a result of a variety of untoward events which may arise 
during the execution of a program. It does not involve a 
switch to a new process . 

A trap may he fixed or ring -dependent . All fixed traps save 
the state in the 10 words starting at 602752B (i.e._, at the 
end of the monitor portion of the context block) . They then 
set G to 600000B.and do X <- n; BRU 6040ft' 2B, where n is the 
trap number, They all have a one word parameter which is put 
into the A register after the state is stored. The value of 
the parameter depends on the trap. Like MGALL-s, fixed traps 
also clear PDF LAG, TDFLAG, M940" and set the LOCKED bit. 

A table of all fixed traps is given in the appendix. Each 
one is described more fully in its proper place in the manual, 

The ring-dependent traps differ in that they send control to 
a location determined by the ring that P is in. They store 
P and the parameter at G' [4] and G' [5] respectively and then 
clear the 940M bit in the status register and do IR <- n; 
BRU $G' [6] . 

In 940 mode, if the S bit (bit 0) of an instruction and the 
P bit (bit 2) are set, the instruction is called a SYS POP. 



I r 
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The first 10 words of the state are stored starting at L[3], 
then A is set to the effective address of the instruction, 
Clear N940 and do X <- OPC, BRU I» [2] . ■ 



!Av -v* /?* 
ir-^ W \j 
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C PU Int errup tability 

The CPU described in this manual is expected to run as part of 

a system which includes, among other things, 

1) Several physical CPUs, which are identical except for 
.a number called the CPU number attached to each CPU. The 
CPUs are numbered from to n-1 where n is the number of 
CPUs . 

2} A separate processor called the ^scheduler which is 
responsible for allocating CPUs to processes. The ^scheduler 
also has facilities for causing the CPU to operate in a 
single-step mode, in which it stores the state, waits and ■ 
then reloads it after each instruction execution, and for 
telling the CPU to stop execution at once (crash) . 

3) A protect mechanism which allows the various proces- 
sors in the system to be interlocked or synchronized. There 
are four protect lines, any of which may be seized by any 
processor. A line may be seized by only one processor at a 
time; anyone else attempting to seize the line is held up 
until the current owner lets it go . 

This section describes the behavior of the CPU with respect 
to 

1) A STROBE signal, which the ^scheduler sends when the. 
CPU is to switch processes 

2) The single- step and crash signals 

3) Protect 4, which is used to interlock the CPUs, 
keeping more than one from being in a locked state. 

4) The timer trap, which occurs when the interval timer 
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in the state becomes negative 

5) The XMON and XUTIL traps 

6) Initialization 

The relevant information is: 

a) Some information in the state 

1) The ring in which the P-counter is contained 

2) The XMON trap bit in SR 

3) The XUTIL trap bit in SR 

4) The sign bit of the interval timer, which we call TO 

b) Some flip-flops in the microprocessor which are not part 
of the CPU state 

1) STROBE, which may be set by another microprocessor , 
normally the jischeduler 
. 2) STEP, which may be set by some external device to 
make the CPU operate in single-step mode. 

3) LOCKED, which is not accessible to external devices 

4) ALARM, which is set when a system crash is impending 

c) The state of protect 4, which will be called CPUPRO 

d) A location in absolute core called CPUWAIT which is used 
to keep the CPU idle after the system has crashed or 
between STEPs . 



£? )K> ,.tl - MICPUAl-4.4 b3 
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A. Idle State 

When it is initialized (by setting the register in the 

microprocessor to 0) the CPU goes into idle state. 

IDLE: Clear map scan request; 

GOTO IDLE IF NOT STROBE ; 

Clear STROBE . 
PWAIT: T <- contents of absolute cell (6 + CPU number) 

(T is the process' PRT index) 

Goto PWAIT if T = 0: 

Clear absolute cell (6 + CPU number); 

Clear LOCKED; Clear the map; 

Find the page with the name in (T) and (T-tl) 

Take it as a context block and load the state 
from location 2764B-2777B in it (called the 
SAVE area) . 

If the page is not found in CRT, send a STROBE 2 to-the 
jischeduler with a message 4B7 in absolute cell 2454B -f CPU 
number *4 then do like ABORT. 

Start executing instructions at the location given 
by the P- counter; 

The CPU returns to the idle state whenever it dumps the state 
•of a process. 

B. Interruption of program execution 

At the start of every instruction, the truth of any of the 
following conditions will stop execution and cause the 
indicated action to be taken. The conditions are treated 
in the order in which they are listed. 
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2) NOT LOCKED AND STROBE: dunip the state into the SAVE area, 
send, a RET URIC message to the {/scheduler and go into idle 
state, 

3) STEP OR ALARM: dump the state into the SAVE area, clear 
STEP. Clear the wait location (23B -f- CPU number) and wait 
until it becomes 123432 10B, then reload the state from 
the SAVE area and proceed. 

At every step of indirection , every start of an instruction 
which is the target of EXU, every parameter of a BLL and in 
all other places where the CPU might be held up for more 
than a few microseconds, (MVB, MVS, CPS), conditions 1 and 2 
are tested and their indicated actions taken. 

C. Setting the bits 

XMON and XUTIL are part of SR and may be set or cleared with* 
SRS> LOADS or XSA. 

LOCKED is set by MCALL or fixed trap. It can also be set by 
SLOK. It is cleared by any BLL or LOADS which leaves the 
monitor ring (BLL, here, includes all variants: UCALL, 
MCALL, POP), and can also be cleared by RLOK. 

TO can be changed by loading a state from the SAVE area or 
by the OPR to set the interval timer. 

D. The X traps 

At every BLL or LOADS a check is made for transition into a 
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'lower ring. If there is a transition from monitor to utility 
or user rings, the XMON trap is caused if the XMONT bit is 
set. Then if there is a transition from utility to user ring, 
the XUTIL trap is caused if the XUTILT bit is set. 

E. The CPUPRO signal 

This protect is seized automatically at each point where 

LOCKED is set and cleared at each point where LOCKED is cleared} . 

The programmer can set it himself with the PRO operate, but 

this is probably unwise . 
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Ordinary Instructions 

This section contains a complete description of the behavior 
of the machine when interpreting an instruction word, with 
the following exceptions: 

instructions with P = 1 are. described under "Programmed 

Operators" 
the BLL instruction is described under "Function Calls" 
the floating point instructions are treated in a 

separate section . 
effective address computation for all instructions is 
described under "Addressing" 

Each instruction is specified in terms of its operands, its 
effect on the state of memory of the running process, and 
any unusual traps it may cause. Traps which are caused by 
the addressing system are the same for all instructions and 
are not considered. Traps caused by the map are the same 
except for the read-only trap. Its occurrence depends on 
whether the instruction attempts to modify memory; this 
should be obvious from the instruction description and will 
not be further mentioned . The address type is S or D for 
instructions which modify memory. 

Part of the state is a 2-bit condition-code . This code is 
set by the RESULT of most instructions as follows: 

if RESULT < 

1 if RESULT = 

2 if RESULT < 




The RESULT is indicated in the description of each instruction 
Unless some other change in P is indicated, all instructions 
end with 

P <- P + 1 ; 

The INSTD bit in the status register is set to at the end 
of every instruction, except for LOADS . 

T ^ e address type of the instruction is indicated for every 
instruction, e.g., 
LDA (F) 

In the description some special notation is used: STORE (X/Y) 
stores X in the memory location addressed by Y. The storing 
includes some special logic for (S) type instructions if a 
field or character is specified as operand (refer to Use of 
Addresses by Instructions); ABS (T) is the absolute value 
Of T, ABS (4B7) = 4B7. 
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CR 

DR 

XR 

P 

L 

G 

CC 



Summary of Abbreviations 
AR A register 
ER B register 

C register (used only for double-precision floating- 
D register point and quadruple loads and stores) 
X register 
Program counter 
Local environment register 
Global environment register 
Condition code, equivalent to RESULT: 
CC = RESULT < 

CC = 1 RESULT = 
CC = 2 RESULT > 
Status register 
OV = SR[22J Overflow bit 
TOV = SR[21] Temporary overflow bit 
CARRY = SR[20] Carry bit 
PDFLAG = SR[19j Permanent double-precision flag, Used 

to set TDFLAG after STF, STD or FCP 
TDFLAG = SR[18] Temporary double-precision flag. Makes 

all floating-point instructions double- 
precision. 



SR 
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Data Transfer Instructions (12). 
LDA (F) Load A register 
AR <- OP; 
RESULT <r AR; 

LDB (F) Load B register 
BR <r OP; 
RESULT -e- BR; 

LDX (F) Load X register 
XR <- OP? 
CC is unchagned 

LDD (E) Load double 

AR «- CONTENTS (Q) ; BR <- CONTENTS (Q+l) ; 

CR *• CONTENTS (Q+2) & BR <- CONTENTS (Q+3 } IF TDFLAG=1 

RESULT <- AR; 

EAX (E) Effective address to X 
XR «- Q; 
CC is unchanged 

LAX (E) Load array index 

XR *- Q OR 4B6 (sets. TAG to 2 for indirection) 

CC is unchanged 

Treats bit ATRAP in an array descriptor opposite to 
all other instructions 

LNX (F) Load negative to X 

XR < OP; two-s complement negation 

CC is unchanged 
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STA (S) Store A register 
STORE (AR, Q) ; 
CC is unchanged 

STB (S) Store B register 
STORE (BR, Q); 
CC is unchanged 

STX (S) Store X register 
STORE (XR, Q) ; 
CC is unchanged 

STD (D) Store double 

STORE (AR, Q) ; STORE (BR, Q+l) ; 

STORE (CR, Q+2) & STORE (DR, Q+3 ) & TDFLAG <- PDPLAG 

IF TDFLAG = 1; 
CC is unchanged 

XMA (S) Exchange memory and A 

TEMP <- AR; AR ^ OP; STORE (TEMP, Q) ; 
RESULT «- AR; 
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8. Integer Arithmetic Instructions (10) 
' ADD (F) Add memory to A 

AR *- AR + OP; (two's complement) 

CARRY <- carry from bit of adder, i.e., set if the 
sum of AR and OP taken as unsigned 24-bit integers, 
is ^ 2^4^ an( j cleared otherwise; 

TOV «*- 1 if the add causes overflow, i.e., if AR and 
OP have the same sign but the sum has a different 
sign, else j#; 

OV <- OV or TOV; 

RESULT «- AR; 

SUB (F) Subtract memory from A 

Proceed exactly like ADD except that (-OP) replaces 
OP. This is ' a two's complement negate, i.e., (NOT 

OP + 1) ■ yA 

ADC (F) Add memory and CARRY to A 
OV <- 0; 

AR «- AR + OP + CARRY; 
Then proceed exactly like ADD 

SUC (F) Subtract memory from A + CARRY 
OV ■*- ■ 

AR <r AR + CARRY + (NOT OP) 
Then proceed exactly like ADD 

MIN (S) Memory increment 
RESULT «- AR <- OP + 1; 
STORE (RESULT, Q) ; 
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MDC (S) Memory decrement 
RESULT <*- AR <- OP -1; 
STORE (RESULT, Q) 

ADM (S) Add to memory 

RESULT *- AR *- OP + AR; 
STORE (RESULT, Q) 

ADX (F) Add to X 
XR <- XR + OP 
CC is unchanged 

MUL (F) Multiply memory and A 

TOV <- 07 

TOV <r OV <- 1. IF QP = AR = 40000000B: 

PROD -*- AR * OP; as two's complement numbers, 

yielding a 47-bit two's com- 
plement result 

AR[0,23] *- PRGD[0,23] ; 

BR[0,22] «- PROD [24,46]; 

BR [23] <- 07 

RESULT .+■ (AR OR (BR RSH 1) ) ; 

The product, consisting of a sign bit and 46 magnitude bits, 
is left- justified in the AB registers. If integers are 
being multiplied, and ASHD -1 is required to obtain the 
integer product in B. 
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DIV (F) Divide memory into AB 
TEMP <- OP7TOV «- 0; 
DIVIDEND «- AB [0, 46] ; 
QUOTIENT <- DIVIDEND/TEMP; 



a 47 bit two' s-complement 
integer treating both ope- 
rands as fractions in the 
range -l£f<(l, and obtain- 
ing a quotient with 23 
fraction bits 



TOV <- OV <~ 1 and proceed to next 



instruction 
AR «- QUOTIENT; 
TEMP «- QUOTIENT * TEMP; 
BR '<- (DIVIDEND - TEMP) 7 
RESULT <r AR; 



unless -1<£ QUOTIENT <1 



yielding a 47-bit product 

as for multiply 

this is the remainder 



The quoteint of the 47-bit dividend and the 24-bit divisor, 
both taken as signed two's complement fractions, is put into 
A and the remainder into B. Overflow occurs if the dividend 
is larger than the divisor, since the quotient cannot be 
represented as a fraction; in this case, the central registers 
are unaltered . 

To divide an integer in A by one in memory, do ASHD -23 first. 





C. Test Instructions (5) 

ICP (F) Integer compare 
RESULT <r AR - OP; 

CPZ (F) Compare with zero 
RESULT <- OP; 

CMZ (F) Compare A and memory with zero 
RESULT *■ AR AND OP; 

The following two instructions operate on string descriptors, 
which are pairs of indirect address words of type string. 
The intended interpretation is that the first points to the 
first character of the string, the second to the last char- 
acter \ 

ISD (E) Increment string descriptor 
TEMP <- CONTENTS (Q) : 

CSIZE «- TEMP [2 j 3]; CPOS <e TEMP [4,51); 
RESULT <- TEMP - CONTENTS (Q + 1) ; 
Proceed to next instruction if RESULT = 0j 
IF CPOS + CSIZE <3 DO; 

CPOS «- CPOS+1; 
ELSE DO; 

CPOS <- 0; TEMP «- TEMP -f 1; 
ENDIF; 

TEMP [2,3] <r CSIZE; TEMP[4,5] <- CPOS; 
STORE (TEMP, Q) ; 
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If the string is empty (the two IAWs are equal) the in- 
struction sets CC to 1 and exits. Otherwise it sets CC 
to j2f or 2, and increments the first IAW by one character 
position in the string. 

DSD (E) Decrement string descriptor 
TEMP <- CONTENTS (Q+l) ; 

CSIZE «- TEMP [2,3] ; CPOS .<- TEMP[4, 5] ; 
RESULT *- TEMP - CONTENTS (Q) ; 
Proceed to next instruction if RESULT = 0; 
IF CPOS > DO; 

CPOS <- CPOS -1; 
ELSE DO; 

CPOS -e 3 -CSIZE; TEMP <- TEMP -1; 
ENDIF; ^ 

TEMP[2,3] +■ CSIZE; TEMP [4, 5] <- CPOS; 
STORE (TEMP, Q+l) ; 

The Idea is the same as for ISD, but the second IAW is de- 
cremented by one character position. 

D. Logical instructions (3) 

ETR (F) And A and memory 
AR «- AR AND OP; 
RESULT «- AR; 

IOR (F) Or A and memory 
AR <- AR OR OP; 
RESULT <- AR; 
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EOR (F) Exclusive or A and memory 
AR <- AR EOR OP; 
RESULT «- AR; 

E. Shift Instructions (6) 

All shift instructions interpret the absolute value of 
OP MOD 64 as the number of shifts to be done. The sign 
of OP specifies the direction: positive for left shifts, 
negative for right. 

SHIFTC «- ABS(OP MOD 64); 

right shift as specified IF OP < ELSE 

left shift as specified; 

RESULT «- AR; 

ASHD (F) Arithmetic shift double (A and B registers) 
• A and B taken as a single 48-bit register are 
shifted. On a right shift, the original sign bit is 
copied into vacated bit positions. On a left shift, 
OV <- 1 if any of the bits shifted out differ from the 
final sign of A. TOV is set to 1 when OV is set, 
otherwise it is set to . 

ASHA (F) Arithmetic shift A 

Identical to ASHD except that only AR is shifted 

LSHD (F) Logical shift double 

A and B taken as a single 48-bit register are 
shifted. Vacated bit positions are filled with zeros. 
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LSHA (F) Logical shift A 

Identical to LSHD except that only AR is shifted 

CYD (F) Cycle double 

A and B taken as a single 48-bit register are 
cycled. I.e., they are shifted, but bits which are 
shifted out one end fill the vacated positions at the 
other end 

"CYA (F) Cycle A 

Identical to CYD except that only AR is cycled 

F. Branch instructions (10) 

BRU (E) Branch unconditionally 

P «- Q; 

CC is unchanged 

Six instructions test the condition code 
BLT (E) Branch on less than 

P ■«- Q IF CC = 0; (RESULT < 0) 

CC is unchanged 

BLE (E) Branch on less than or equal 

P +■ Q IF CC = OR CC = 1; (RESULT £ 0) 
CC is unchanged 

BEQ (E) Branch on equal 

P *- Q IF CC = 1; (RESULT = 0) 
CC is unchanged 
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BNE (E) Branch on not equal 

P <- Q IF CC ^ 1; (RESULT £ 0) 
CC is unchanged 

BGE (E) Branch on greater than or equal 

P *- Q IF CC = 1 or CC = 2; (RESULT ^ 0) 
CC is unchanged 

BGT (E) Branch on greater than 

P <- Q IF CC = 2; (RESULT > 0) 
CC is unchanged 

Two branch instructions affect the X register 
BRX (E) Branch on index 

XR <- XR + 1; 

P <- Q IF XR < 0; 

CC is unchanged 

BSX (E) Branch and set X 
XR <~ P + 1; 

P *- Q; 

CC is unchanged 

BLL (E) Branch and load L 
is described elsewhere 

G. Miscellaneous instructions (5) 
HLT (F) Halt 

Always causes the TI trap- 
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EXU (E) Execute 

Initializes IR <- XR & R <- Q f then, interprets 
CONTENTS (Q) as an instruction and executes it. 

EAC (E) Effective address computation 

This instruction computes the effective address of 
CONTENTS (Q) interpreted as an instruction word. Similar 
to EXU, IR and R are initialized to XR and Q respectively. 
The results of the computation are given in registers 
as follows: 

XR{#, 5J <- RESULT <- 1 & AR <- OP 

if the address is Immediate 
XR[0,5] <~ RESULT <- 2 & XR [6, 23] <- Q 

if the address is ROD or ROX read only 
XR[0,5] <- RESULT <- 3 & XR[6,23] *- Q & AR <- MASK .&-. 
BR <- SHIFT 

if the address refers to a field or 
or character . 

MASK has bits (24-SIZE), 23 on, the rest 
off. SHIFT equals to 24- (FB + SIZE) 
XR[0, 5] <- RESULT *- & XR [6, 23 ] «- Q 

in all other cases . 
Note that Q - whenever given - is ring checked 
against R in the final phase of -the address calculation, 
(refer to Addressing from Instructions) 
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SRS (F) set or reset status bits 

The operand is used to set or reset the status 
register in the state in the following way: 
SR <- SR OR OP IF (OP AND 1) = 1 ELSE 
SR AND NOT OP; 

TSB (F) Test status bits 
RESULT <r SR AND OP; 

I.e., 1 bits in the operand select bits of SR. 
The condition code is set depending on whether all the 
selected bits are or not. 

H. OPR (F) Operate (1) 

If the operand is negative, the instruction is a system 
call . Bits 14-15 in the absolute value of the operand 
select one of four alternatives: 

UCALL 

1 UCALN 

2 MCALL 

3 MCALN 

Bits 16-23 in the absolute value is the address for the 
system call, (as described in a separate section) 

If the operand is positive, it is decoded to determine 
what is to be done : 



L-x ^ ^ 
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CAB Copy A to B 

XAB Exchange-: A and B 

CSA Copy B to A 

CBX Copy B to X 

XXB Exchange B and X 

CXB Copy X to B 

CAX Copy A to X 

XXA Exchange X and A 

CXA Copy X to A 

CNA Negate A 

CNX Negate X 

ZOA Clear A 

ZAB Clear AB 

ZOB Clear B 



CGA Copy G to A 



XGA Exchange G and A 

. CLA Copy L to A 

XLA Exchange L and A 

CSA Copy SR to A 

XSA Exchange SR and A 

CTA Copy in t e r v a 1 
Timsr to A 

CCA Copy Compute 

time clock to A 



BR <- AR; 

T <~ AR; AR < RKSULT <- BR; BR -:- T; 

AR <- RESULT <- BR; 

XR <- BR; 

T <- BR; BR <- XR; XR «- T; 

BR <- XR; 

XR <- AR; 

T «- AR; AR <- RESULT <- XR; XR <- T; 

RESULT <- AR <- XR; 

AR <- RESULT <e- -AR; 

XR <- -XR; 

AR <- RESULT <- ', 

AR <- BR <- ER <- 0; 

BR <- 0; 

AR <- RESULT <- G; ,-,;. 

T «- AR; AR <-- RESULT <- G; G <- T; 

AR <- RESULT <- L; 

T *- AR; AR <- RESULT <- L; L '<- T 

AR <- RESULT <- SR; 

T -*- AR; AR <- RESULT <- SR; SR <- T ; 

A <~ RESULT <- IT; 

A <~ RESULT <- CTC; 



NOP 



No operation 




MVB Move block 
The block of AR words starting at XR is moved to the AR words 
starting at BR. The words are moved one at a time, and the 
registers are updated after each word is moved to reflect 
the number of words remaining to be moved. This instruction 
is interruptable . The move is done in such a way that no 
word is overwritten until it has been moved. 

MVC Move constant 
XR is stored into the AR words starting at BR. This instruc- 
tion is interruptable. 

MVS Move string 
The string of AR bytes starting at the byte specified by 
BR taken as a string IAW is moved to the AR bytes starting 
at the byte specified by XR taken as a string IAW. The 
bytes are moved one at a time/ and the registers are updated 
after each byte is moved to reflect the number of bytes 
remaining to be moved. If the source and target strings 
overlap, the move is done in such a way that no character 
is overwritten. until it has been moved. If the strings do 
not overlap, after execution BR and XR will always point to 
the first characters after the source and target strings 
respectively. This instruction is interruptable. 

CPS Compare string 
the string of AR bytes starting at the byte specified by 
BR taken as a string IAW is compared with the AR bytes 



P\^ $ 
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starting at the byte specified by XR. RESULT is set to 
indicate whether the first string is smaller, equal to, 
or greater than the second. The registers are updated every 
time a byte is compared. This instruction is interruptable 

CLS Compute length of string 

AR and BR are taken as string IAWs . The number of bytes in 

the string starting at the byte specified by AR and ending 

at the byte specified by BR, -1 is put into AR. The 

CSIZE field of BR is used to determine the byte size. 

RESULT <• AR; 

ASP Add to string pointer 
AR is taken as a string IAW. Into XR is put a string IAW 
which points to the XRth byte beyond the one pointed to by 
AR. 

LLT Locate leading transition 
The bit number (counting from on the left) of the left- 
most bit in AB which differs from the sign bit of A is put 
into XR. If no bits differ, is put into XR. 

RESULT <- XR; 

COB Count one bits 
The number of one bits in the A and B registers is put into 
XR. 

RESULT <- XR; 

LOADS Load state 
Loads the first 10 words of the state (not including the 



Jp* 
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compute time clock or the interval timer) from the 10 words 
addressed by X. A ring trap will occur if the new P is in a 
higher ring than the current P. This instruction does not 
clear the INSTD bit. An XMON or XUTIL trap may occur if the 
new P is in a lower ring than the current P and the XMONT 
or XUTILT bits are set in the current SR as described under 
"CPU Inter rup tab ility. " 

STORS Store state 
Stores the first 10 words of the state into the 10 Words 
addressed by X, but does not store P and X; the corresponding 
locations are left unchanged . 

LSC load string constant 
The word addressed by X is fetched and used to form a 4-word 
-string constant in A, B, C and.D as follows: 
TEMP *■ CONTENTS (XR) ; 

CSIZE <-TEMP[2,3]; CPOS ^TEMP[4,5]; 
AR <- BR <- 4B7 + CSIZE * 4B6 + 

(3 - CSIZE) * IB 6 + XR; 
CR <- DR <r 4B7 -f CSIZE * 4B6 + 

CPOS * 1B6 + XR 4- -TEMP[6,23] ; 

The following OPRs are privileged. If P < 600000, the TI 
trap will occur. 

SLOK Set CPU lock 

RLOK Reset CPU lock 

AID Absolute load A 



/?* 
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Loads A with the contents of the core location whose absolute 
address (i.e., unmapped address) is contained in X, 

AST absolute store A 
Stores A into the core location whose absolute address is 
contained in X, 

AAX Absolute address to X 
Loads X with the absolute address corresponding to the virtual 
address in X. Bit is set if the physical map entry was 
empty. Bit 3 is set if PMRO was on in the physical map entry, 
bit 2 is set if bit 3 is set or the dirty bit was clear. 

PRO • Protect 
Attempts to set PROi if AR[20-f-i] is on. If all the selected 
PROs are set successfully CC •*- 0*, if none are, CC <- 1. 
These are the only possibilities. 

UNPRO Unprotect 
Clears PROi if AR[20'-f-i] is set 

ATTN Attention 
Sends a Strobe signal to microprocessor i if AR[16+i] is set. 

USCL ^.scheduler call 
This OPR initiates a switch-processes sequence. The state 
of the machine is dumped at the SAVE area (6027643) . The 
Interval Timer, shifted 7 to the right so that the least 
significant bit counts milliseconds, is stored into the MCT 
field (8,0:7) of the process' PRT entry. 




The ^scheduler is called with bits 0:5 in A as an opcode, 
the CPU is put into the IDLE state. 

CMAP Sets all EF empty flags in the map to 1 

CMAPS Clears the maps of both CPUs in the system 



CAT 



Copy A to interval timer IT <- A; 



CAC Copy A to compute time clock CTC <- A; 



RUN Read Unique Name 
A unique name is read from the unique name generator and 
put into AB „ 

BR <- low order bits of unique name; 

AR ■*- high order bits of unique name; 



~r. 
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Floating Point 

A. Number Representation 

A 48-bit single precision floating point datum represents 
a rational number in the following way: 
1) Positive numbers 

1 11 12 47 

X: 






M 


N 



M is the biased exponent E: 

E <- M - 2j2f00B; 
positive number X = N * 2 
where 2 35 £ N £ 2 36 -1 and -2 1 ** { E { 2 ¥ -1 



E. g. + 1.0 is represented as 
1 11 12 



47 







10 







1.00 







,10 



Largest number is 2 

1 11 12 



* (1 - 2~ 36 ): 



47 






11 1 


1.11 1 



Smallest positive number is (except for unnormalized 
numbers, see below) 2 ; 

1 11 12 47 







00 







1.00 







2) Negative numbers 

The sign bit (bit 0) indicates that the number is 
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negative. N is given in two's complement form: 

negative number X = (N - 2 36 ) * 2^~ 35 \ 1 £ N £ 2 35 
1 11 12 47 

-1.0: 



1 10 







1.00 







Lowest negative number is -2^ *(1 - 2"" 3 °) 
1 11 12 47 



1 


11 1 


0.00 1 



Maximum negative number is -2"2« 

1 11 12 47 



00 







1.00 







3) Zero: 



1 







00 



11 12 







0.00 



47 







4} Un-normalized numbers 

The ° n ly un-normalized numbers allowed are these: 
1 11 12 47 

,1 £N £ 235 



X: 







00 







N 



and their negatives, i.e., Ix! <^ 2~" 2 . Note that 



+ 2 - 



are both normalized and un-normalized 



5) Infinity 

1 



11 12 



47 



1 11 



0.0 







The symbol - « is treated as the single point at 
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infinity in the one-point (projective) closure of 
the reals. Operations on - ■ « are summarized in 
the Appendix. 

6) Undefined floating point numbers 



Data of the form 

1 11 12 



47 



9: 







M 



N 



,35 



B 



with < M & £ N £ 2"" - 1, 
and their negatives are not floating point numbers 
If such a number appears as an operand for any- 
floating point operation, the trap UFN will occur. 

Algebraic Closure Properties of Normalized Numbers 
Numbers of the form A.l, A. 2 and A. 3 are normalized 
numbers, (n.n's) 

1) If X is an n.n.^ so is -X. 

__ 9 10 

2) If X is an n .n not zero nor +2 , so is 1.0/X. 

The smallest positive n,n. whose reciprocal is an n ,n . 
,-2 1 M . o-35 



is 2" 



(1 + 2" 03 ) . 



C. Double Precision 

The 96-bit double precision data have an additional 48 

fraction bits. For example a DP positive number: 
1 11 12 47 






M 


N 



48 



95 



N' 
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represents X = (N + N' * 2"48) * 2 (E-35) , £n' £ 248 -i 

D. Floating Point Instructions (8) and OPRs 

All floating operations have single (SP) and double (DP) 
precision variants, bit TDFLAG in SR selecting the one 
to be used. Bit PDFLAG is used to set TDFLAG after a 
compare (FCP) or store (STF). 

Floating operations set CC to indicate if the result is 
less or greater than or equal to 0. (STF and FIX 

leave CC unchanged) 

> ■ . - . ■ ■ 

FLD (E) Floating load 
An SP or DP floating point number starting at Q is 
copied into the floating point accumulator . (The A, B, 
C, D and E central registers) 

STF (D) Floating store 

SP: The floating point accumulator is rounded 
at bit 35 of the fraction and copied to (Q) and (Q+l)'. 

DP: Four words are copied from FA to the 
locations starting at Q. A double floating store causes 
no rounding if the FDP bit in SR is set. Otherwise it 
rounds at bit 71 of the fraction and zeroes the last 
12 bits . The FDP bit thus determines whether DP numbers 
• are stored with 72 or 84 bits of fraction. Overflow 
may occur because of the rounding. In all cases 
TDFLAG <- PDFLAG. after the store. 



&* 
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FAD (E) Floating add 

SP: The operand is extended with 48 zero? on 
the right. A DP is then done. 

DP: Let the operands be a * 2 b , c * 2 d . The 
two exponents are compared . Suppose b ^_ d . Then c is 
shifted right by b - d . A 87 bit register is provided 
to hold c, which is loaded (sign + 84-bit fraction) 
into the 85 most significant bits. The two least 
significant bits are cleared. The 86 most significant 
bits participate in the right shift in the usual way. 
The least significant bit is 'sticky': if a 1 is ever 
shifted into it, it remains 1 from then on. 

After c has been shifted, it is added to a in an 85-bit 
adder, yielding a result r of 87 bits. Bits 85:86 of 
c do not participate in addition. 

Now, if an overflow has occurred (a [03 = c[0] ^ r [0] ) , 
r is shifted right by 1. r[86j. is treated as a sticky 
bit in this shift just as it was in the shift of c . b 
is incremented by 1 if this shift occurs and r [0] <- NOT 
r[0]; 

The result is normalized by left shifting until either: 

1) the sign bit differs from the next bit or 

2) the fraction is 1X00 ... 

The exponent b is decremented by 1 for each left shift. 
Lastly the result, rounded at bit 83 of the fraction 
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(i.e., r[84], since when we say 'bit 83 of the fraction' 
we don't count the sign bit) in accordance with the 
rounding mode in force, is assigned to the floating point 
accumulator. See the discussion of rounding below for 
details. Both overflow and underflow may occur. 

FSB (E) Floating subtract 
Identical to addition except that the negative of the 
second operand is taken first. This cannot cause any 
abnormal conditions . 

FMP (E) Floating multiply 

SP: The accumulator is rounded to single 
precision, then the two 36-bit fractions are multiplied 
to yeild a 72-bit .result . The exponent which goes with 
the result is the sum of the exponents of the operands ---■ 
plus one, to correct for the placement of the binary 
point in the product. The 72-bit fraction is shifted 
left if required for normalization. No rounding is 
required since the accumulator can hold this entire 
product . Overflow or underflow may occur . 

DP: The two 84-bit fractions and the two signs 
are multiplied to yield an 86-bit result (sign plus 85 
magnitude bits) and an 87th bit which is the union of 
the 82 least significant bits of the full 168-bit product. 
The resulting 87-bit number and the exponent obtained 
by the procedure described for single precision are 
normalized and rounded like the result of an add. 
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FDV (E) Floating divide 

SP: The 36-bit divisor fraction is divided into 
38 bits of the accumulator fraction to produce a 3 7-bit 
quotient. To this is appended a 38th bit which is set 
if the division is not exact or if the other 46 bits of 
the accumulator fraction are non-zero. The resulting 
38-bit number is put into the fraction of the accumulator 
and filled out with 46 zeros on the right. The exponent 
of the result is computed by subtracting the divisor 
exponent from the dividend exponent. 

DP: The 84-bit divisor fraction is divided into 
the 84-bit accumulator fraction to produce a 85-bit 
quotient. The exponent is computed as for SP and the 
result is rounded , in the usual way. 

Overflow or underflow may occur. ^Division by produces 
its own trap. (DIZ) 

If the divisor is an un-normalized number it is 
normalized prior to division. It may or may not cause 
overflow as explained below. 

FCP (E) Floating compare 
Identical to floating subtract, but the result is not 
assigned to the floating accumulator. CC will be set 
as usual to indicate the sign of the result „ 
TDFLAG «- PDPLAG. 

FLX (E) Fix and load X 
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XR is assigned a 24-bit integer which is the floor of 
the floating operand. If the floor is )> 2^3 _i i n 
magnitude, the trap FLXO occurs. The result does not 
depend on SP or DP mode. 

FNA (OPR) Floating negative 
The number in the floating point accumulator is replaced 
by its negative. 

FIX (OPR) 

Similar to FLX, but the operand is taken from the 
floating point accumulator and the result is put into 
RESULT and AR. 

FLOAT (OPR) 
A FLOAT operation produces a (normalized) floating point 
number in the floating point accumulator which when FIXed 
will restore the integer operand in AR. (unless it is 
4B7) . Nothing can go wrong with FLOAT. 

E . Rounding 

There is a three-bit field (TRMOD) in SR which specifies 
how rounding is to be done (the field PRMOD is used to 
set TRMOD after every FAD, FSB, FMP, FDV, STF or FCP) . 
The descriptions of instructions above state explicitly : 
each point where rounding is done. The phrase 'round at 
bit n of the fraction' means that bit n of the fraction 
(numbering the magnitude bits from and not counting the 
sign) is the least significant bit retained. 
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The rounding modes are 



TRMOD 


Name 


Rounding. 





N 


nearest number 


2 


F 


floor (toward 0) 


3 


C 


ceiling (away from 0) 


4 


P 


away from - •« 


5 


M 


toward - - » ■ 



Rounding involves three bits. The first is the least 
significant bit to be retained and is called Q. The 
one following Q is called R. The third is the union of 
all the bits following R (sometimes only 1, none for 
double divide) and is called T. 

The rounding rules are as follows (call the sign S) : 
N: +1 (add 1 to least significant retained bit) 

if R = 1 unless Q = and T = 

F: +1 if S = 1 and R or T = 1 

C: +1 if S = and R or T = 1 
P: +1 if R or T = 1 
M: no action 



F. Overflow and Underflow 

Overflow or underflow occurs if at the end of a floating 
point instruction, the exponent is outside the permitted 
range . 

Overflow always causes a trap (FLO) # it leaves a correct 
result except for the exponent, which must be read as a 
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12-bit two's complement number with sign bit the 
complement of the high-order bit preserved. 

Underflow action depends on the SUF bit in SR. If it 
is set j no trap occurs and a suitable unnormalized 
number or zero results . Otherwise, trap FLU occurs and 
the result is correct (and normalized) with the same 
rule for the exponent as was stated for overflow. 
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DEFINITION OF INSTRUCTION CODES 



:ode 


mnemonic 


a.ty 





HLT 


F 


1 


IDA 


F* 


2 


LDB 


P* 


3 


IDX 


F 


4 


LDD 


E* 


5 


EAX 


E 


6 


mx 


E 


7 


XMA 


s* 


10 


ETR 


F* 


11 


I OR 


p* 


12 


EOR 


F* 


13 


STD 


D 


14 


STF 


D 


15 


STA 


S 


16 


STB 


S 


17 


STX 


s 


20 


ADD 


p* 


21 


SUB 


p* 


22 


ADC 


p* 


23 


sue 


p* 


24 


ADM 


s* 


25 


ADX 


F 


26 


MIN 


s* 


27 


MDC 


s* 


30 


MUL 


p* 


31 


DIV 


F* 


32 


ICP 


p* 


33 


CPZ - 


F* 


34 


CMZ 


F* 


35 


ISD 


E* 


36 


DSD 


E* 


37 


EXU 


E? 



ode 


mnemonic 


a.ty 


40 


ASHD 


F* 


41 


AS HA 


F* 


42 


LSHD 


p* 


43 


LS13A 


p* 


44 


CYD 


F* 


45 


CYA 


F* 


46 


TSB 


F* 


47 


LAX 


E 


50 


BRU 


E 


51 


BLT 


E 


52 


BEQ 


E 


53 


BLE 


E 


54 


BGT 


E 


55 


BNE 


E 


56 


BGE 


E 


57 


BLL 


E 


60 


BLLN 


E 


61 


BRX 


E 


62 


BSX 


E 


63 


SRS 


F 


64 


EAC 


E* 


65 






66 






67 






10 


FLX 


E 


71 


FLD 


E* 


72 


FCP 


E* 


73 


FAD 


E* 


74 


FSB 


E* 


75 


FMP 


E* 


76 


FDV 


E* 


77 


OPR 


F? 



indicates that CC is set by the instruction 



htt 

%&i? ^jjs/ ^fi^ . 
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DEFINITION 


OF OPR ADDRESSES 




ii 


• 

OPR address mnemonic 


OPR address mnemonic 







CAB 


40 






1 


XAB 


* 41 


LOADS 


* 


2 


CBA 


* 42 


STORS 




3 


CBX 


43 


LSC 




4 


XXB 


44 


FIX 


* 


5 


CXB 


45 


FLOAT 


* 


6 


CAX 


46 


FNA 


* 


7 


XXA 


* 47 




.i 


10 


CXA 


* 50 






11 


CNA 


* 51 






12 


CNX 


52 






13 


ZOA 


* 53 






14 


ZAB 


54 




■ 


15 


ZOB 


55 


SLOK 




16 


CGA 


* 56 


RLOK 




17 


XGA 


* 57 


ALD 


* 


20 


CLA 


* 60 


AST 




21 


XIA 


* 61 


AAX 




, 22 


CSA 


* 62 


PRO 


* 


23 


XSA 


* 63 






24 


CTA 


* 64 


UNPRO 




25 


CCA 


* 65 


ATTN 




26 


NOP 


66 


USCL 




27 


MVB 


67 


CMAP 




30 


MVC 


- 70 


CMAPS 




31 


MVS 


71 


CAT 




32 


CPS 


* 72 


CAC 




33 


CLS 


* 73 


RUN 


* 


34 


ASP 


74 






35 


LLT 


* 75 






36 


COB 


* 76 






37 




77 






* indicates that CC is set 


. by the OPR 







»■"_ ■ ' " "■ 


c 
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: 


Summary of 


Instruction Addressing 


Abbr . Name 


Notation 


Address Computation 


D 


Direct 


OPC G ' [W] 


Q .«- W+G; OP *- CONT(Q) 


I 


Indirect 


OPC $G* [W] 


IA(W-hG) 7 


X 


Indexed 


OPC X ' [W] 


Q «- W-flR; OP <- CONT(Q) ; 


PD 


Pointer dis- 
placement 


OPC PRT[D] 


Q <- SHORTPTR(PTR <- W 
[16,23],IR)+(D «- SIGN 
(W[10, 15])); OP «- 
CONT(Q); 


IPD 


Indirect-pointer 
displacement 


OPC $PTR[D] 


IA(PD(W)) ; 


BX 

■ 

• 


Base-index 


OPC B[X] 


T *- SHORTADR(B «- W[16, 

23]); 
IR <- SHORTPTR (X «- W 

[10,15],IR); 
IA(T); 


BXD 


Base-index- 
displacement 


OPC ($X*) [X-fD] 


T <r- IR- 

IR <r SHORTPTR(W[16,23], 

#)+SIGN(W[10,15]} ; 
IA(T); 


IM 


Immediate 


OPC I 


OP «- SIGN(W[13,23]); 


? .IMX 


Immediate 
indexed 


OPC X'+I 


OP <- IR -f- SIGN(W[13, 
2.3]); 


LR 


L-relative 


OPC L' [D] 


Q «- L+(D *> W[l3,23l); 
OP *- CONT(Q) ; 


ILR 


Indirect 
L-relative 


OPC $L' [D] 


IA(LR(W)); 


SR 


Source -relative 


OPC R" [D] 


Q <- R+ (D *- SIGN (W[ 12, 
23])) ; OP <- CONT(Q) ; 


ISR 


Indirect source 
relative 


OPC $R" [D] 


IA(PR(W) ) ; 

• 


Note 


s: W[i,j] means bits i to j of the 
is the leftmost hit. 


24-bit quantity W. Bit 


■ 


SHORTADR(W[i, j] ) 


means IR IF W[ 
G+W[i+1, 
L-fW[i-hl, 


i,j]=0 ELSE 

j] IF W[i]=0 ELSE 

jl 


. 


SHORTPTR(W[i, j]Y) 


means Y IF W[i, j]=0 ELSE 

CONTENTS (G-f-W[i+l, j] FI W[i]=£f 
ELSE L+W[i+1, j] ) 
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SIGN (W[i,j]) means W[i, j] interpreted as a twos-com- 
plement number of (j-i+1) bits. 

CONT (W) or 

CONTENTS (W) means the contents of the memory location 

whose address is the value of W. 

A ring check is performed with R 
as a source and W as target. 

XX{W) ; where XX is the abbreviation for an addressing 
mode, means the value of Q if that mode is applied to W. 

IA (X) means to initiate indirect address word cal- 
culation on IAW +- CONTENTS (X) & R <- X. The calculation 
depends on IAT <- IAW[0, X] 

All instructions start with IR <- XR & R «- p; 



Summary of Indirect Addressing 



Name 



IAT 



Notation 



Normal Like instruction, 

with IAW for OP 



Field 



FIELD D:FB, 
FEfSIZE 



String 



STRING WA:CPOS 
CSIZE 



Address Computation 

TAG = IAW [2,4], then like 
instruction, except for 
TAG = D, I,X use IAW [6,23] 
for W and don ' t add G . Trap 
IATRP (R) i f W [ 5 ] =1 . Add r , 
IR to Q ( for LR or SR mode ) 
or to LR or SR (for ILR, ISR) 
if -IAW" [6]=1, and use IAW 
[7,23] for W. 

For TAG=PD, IPD, calculate 
address as D,X (G is not 
added) . This is the read 
only (ROD,ROX) addressing 
mode . 

Q ■<*- IR + (DISPL ^ SIGN (IAW 

[13,23]); U^CONT(Q); 

OP <r U[FB <-' IAW [8,12],FB + 

(SIZE <- IAW [3,7])]; 
IF(SE <- IAW[2,2])=0 ELSE 
SIGN(U[FB, FB+SIZE]) ; 

CSIZE <r IAW [2,3] gives byte 
size: 6,8,12 or 24. Then 
IAW selects byte COPS <- IAW 
[4,5] from word WA <- IAW 
[6,23]. 
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Array 



ARRAY LB:UB*MULT; 
IAW 



Two words . Trap ABE (R) IF 
IRCLB <- Wl[8, 8] OR IR > UB<- 
(Wl[7,23] IF (LEB «- Wl [4,4] 
=0) ELSE Wl [11,23] ) ; 
IATRP(R) IF (Wl[3,3]=l) f 
(INSTRUCTION = LAX); 
IR «- (IR-LB)*(MULT <- (Wl [5, 
6] IF LEB=0 ELSE Wl [5, 10] 
+1)7 



fi'W 



.l 
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FIXED TRAPS 



Number Name 



MACC 



PRO 

PMIM 

PNIC 



s 


TO 


6 


PI 


7 


TI 


8 


XMON 



■ 



11 



XUTIL 



ILIM 



Caused By 

Memory access error - at- 
tempted access to monitor ■ 
from below M or utility 
from be lev/ U 

attempted write of RO page 

attempted reference to page 
not in map 

attempted reference to page 
not in core 

timer overflow - not in 
monitor mode 

privileged instruction 

trapped instruction 

on exit from monitor via 
any BLL or LOADS if XMONT 
is set in the state 

on exit from utility via 
any BLL or LOADS if XOTILT 
is set in the state 

indirect limit exceeded 



Pa^cmm : Ler 

(RING(R)-l) 
IB 6 



Q 
Q 





address of 
IAW 



12 



MAB 



map abort 
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RJNG-DEP£-:-:D£-;iTT TRAP 



Number 


Name 


1 


ABE 


2. 


FLO 


3 


FLU 


4 


RO 



Caused^ By 



6 


UFN 


7 


FLXO 


8 


DIZ 


9 


STKOV 


10 


BLL Ei 



array bound exceeded. 

floating overflow 
floating underflow 
read only trap 

IATRP indirect address trap bit 

undefined floating number 

overflow on FIX or FLX 
instruction 

floating divide by zero 

stack overflow 

BLL ERR function call error 

described in separate table 



Parameter 

address of 
JAW 



address of 
ROD or ROX IAW 

address of 
IAW 



NAW-i- 
CLASS * IB 6 



ft $x 
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Class 
1 
2 
3 
4 
5 
6 



address type error in A 

wrong number of arguments 

argument .type mismatch 

inadmissible argument 

address type error 

array , label or string 
descriptor format error 



Parameter 

1B6 
2BG -f NAW 
3B6 + NAW 
4B6 + NAT7 
5B6 + NAW 
6B6 + NAW 






/~> / 
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G>[0] 

G'fl] 
G'[2] 
G'[3] 
■6'[4] 
G'l5] 
G'[6j 
G*[7] 
G f [31] 
G' [127] 

G* [37777B] 

"L*[j2f] 
L'[l] 
L'[2] 

L'[31] 
L' [127] 
L f [20'47] 

4#0 r 0'00'3 



SUMMARY OF IMPORTANT CORE ADDRESSES 

Start at the user ring- 
POP entry I AW 
2nd word of POP entry I AW 
SP - Stack Pointer 
SL - Stack Limit 

Ring dependent trap - P is stored here 
Ring dependent trap - parameter is stored here 
Ring dependent trap service entry IAW 
(may be used as 2nd word of IAW) 
Last word which can be used as an index in BX 
Last word which can be used as a pointer in PD 
or IPD or as a base in BX 

Last word which can be accessed by p, I addressing 
1st word of the return descriptor - P 
2nd word of the return descriptor - L, STK, CPA 
SYSPOP transfer address 
Similar to G ' [37] 
Similar to G r [12 7] 

Last word which can be addressed by L, LI 
addressing 
Start of monitor ring 



. J5 



4#30'£#B 
403014B 
40301612 
600000B 

60001 4B 
6027 52B 
.$02164® 
604000B 
604002B 
777777B 



r~n 
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Start of utility ring, G for utility 

G may be stored here 

UCALL entry IAV7 

Monitor ring starts again, G for monitor, 

context block 

G may be stored here 

State is stored here if a fixed trap occur: 

Start of the SAVE area 

MCALL entry IAW 

Fixed trap entry 

Maximum virtual address 
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* SPL PROGRAM 70 DEFINE RLL 

.BLLs ' f>0; SPEOG* MCAL«-03 i\'EVG*-Gs GOTO BLL1J 
BLLM: r>13 SPEOOJ MCA!-«-05 NEV.'G-G.s GOVO BL1.1J 

* OPR VJ1TH NEGATIVE OPERAND: 
OPRs OP- ~GP; 

N-GP £ BIT15J SPEC«-05 

MCAL-OP S BIT14*I5 

UJET7G-403900B & R-403Q!^3) IF MCAL-I ELSE 

CWEWG*-6000G8Q a R«-604OGS3)J 

JR*-0P S BIT16TKRU23* IA(R>J GOTO BLLU 



I POP: 



BLL1 : 



IyV 
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POPV'-CQNTENTSCP)* IR«-POPV S FOPC* N-0 

SPEC-H MCAL-0; newg-g; 

IA(G)I TIC) IF IMMEDIATE- i; GOTO BLLl J 

N EV.'P W- C ON T EN T S C ) 3 
BLLERRC!) IF NEK'PV $ BITS; 
NE^'pfCNEWPV S FLW IF WEVPW S BIT4-G 

ELSE O + NEVPV! S FSTWJ 
BRD^CON'TEMTSCG + 1 > FTi\ ! ATF*-C* 
CLL-BRD S B1T0S STK-BRD S BIT! I 
CPA^BRD S B1T2I 

CPR-BRD S BIT3 IF CLL-1 ELSE UwSTK-BRD S BIT3* 
REL-BRD S BIT43 FTN«-BRD S EIT5J 
NEWL-E-BRD S FEl 
IF RINGCWEWPXRING(P) DO; 

NEVG-GC 14 3 5 RET-! 5 
tMDiFS 



OBTAIN NEW LOCAL ENVIRONMENT 

IF STK=M DO; 

IF CLL=0 DO S 

IF U^STK = 0; SP<-L; 

ELSE DOS SP*-EJ NS^L-E-FEi 

END IF; 
ELSE DO; 

sp*-nemg£23*ej stkovc ) if sp>=n'e^;gc 3 3 s 
nev:l*-wev;g[23i 

ENDIFJ 
ELSE DO; 

NEWL-L IF NEVL=0* 
EMDlFs 

RINGCHECK<NEV.'P>J 

COPY ARGL'rtE.\'TS 

BLLERRC2) IF N=CPA* 

na'^p-u; 



IF Cr 



?/> .'.*.■"• n."! 



FOil ^'FS'^NEVP BY 1 DO 
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R*-J-LE'--;?J FP -CONTENTS <NF'0 J 
FTYPE^FP S TYPE; 
IF SPEC-! DOS 

spkop' ap-popwj tifi\:<- r'Ai;- 1 s 

ATYP£>FTYPES ASTR^FP £ FSTPJ AENDF'-FP S Ei'ryr* 
ELS'C DO J 
LQJ R-P5 AP^CO;rf&-rOS(NA*;)^ 

A-TYPE-AP S TYPE! ASTR-AP £ S7R; 

AENDF-AP £ ENDFi 
ENDIFJ 
IF ATYPE-0 DOS 

* JUtfP IN ACTUAL ARGUMENT LIST 

r«-p; ir-xr; eacnaw); 

BLLERRC5) IF IMMEDIATE J 
NAW«-Qi 
GOTO LSI 
ELSE DOJ 

BLLERR<2> IF AENDF&'FP S ENDF5 
IF ATYPE#FTYPE DOJ 

* TYPES DISAGREE. ERROR UNLESS ONE IS JOKER* JOKER IS CHECKED 

* FOR BELOW UNLESS CADDR=i OR FSTR8ARRAY* IW WHICH CASE IT IS 

* NOT CHECKED* 

IF ATYPE01 A DOl 

DLL ERR C 3 ) IF FTY P E# \ At 
FTYPE-ATYPE* 
ENDIFl 
ENDIF? 
NAVP^NAVS 

IF ASTR-0 OH ASTR-2 DOl 
NAV>NAM*1 IF ASTR-SS 

IF FP S F5TR-0 AND ASTR=2 OR FP S FSTR-! 
AND ASTR-0 DOl 

BLLERRC3) IF FTN=B; FTNATF-15 
TEMP«-MAW*1B63 
GOTO Lll 

endif; 
else do; 

bllerrc3) if fp s fstr=0j 
endif; 
* check for actual arg in accumulator 

if cap and 78037 777b>#0 d05 

r*-pi ir-xrs eacnavp>j argadr«*q; 

IF FP S CADDR-U DOl 
IF IMMEDIATE-! DOJ 

* CONSTRUCT IMMEDIATE IAW 

TEi^P^-OR A.NJD 37773 OR 1 63^B/;i 
ELSE DOS 

RIMGCRECK(ARGADR)5 TEMP^ARGADR? 

* flAUE TliE IAV; READ-ONLY IF NECESSARY 

TE(-iP«-TEr:p*iB7 IF READONLY"! OR ASTE-3* 
END IF 2 

* Fit: UP SO THE COPY VALUE COD-: WILL COPY THE ADD;; ESS IR TE-P 
LI : FTYPE'-U FP S FSTR-Ir 

ELS:: DOS 




L2s 



IF IMMEDIATE- I DO' 
BLLERRCS) IF FTY. 

EiWlFZ 

TEMP*- < OP IF FTYPE-1 
EN D I F 1 
OLOR-R3 
CPVADR*-C (FP 
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'£<' ? or fp s f:;t 

ELSE C0M7ENTSCA 



ROW:) 






;L IF FP- 



E 



2 

4 



ELSE 
ELSE 
OR FTVP 



AMD 3777E; :! 
<FP AND 37 777B)*ME t 'JG>* 
GOTO ARRAY IF FP -$ FSTR-GS 
COUNT- < I IF FTYPE^I OR FTYPE-9 
IF FTYPE-2 OP FTYPE=3 
IF FTYPE-4 OR FTYPE-5 
ELSE GOTO STRING IF FTYPE=7 
ELSE GOTO LABEL IF FTYP£=S 
ELSE BLLERR<4>>> 
UFN'TRAPO IFCFTYPE-3 OH FTYP£=4> 

' AND UN D E F I N E D ( T EH P > I 
R-NEVPJ $CPYADR*-TEMP; COU.\*T**CGUNT- ! > 
IF COUNTS do; 

R*-OLDRJ G*-Q+!J 
CPYADR*>CPYADR*il 
TEMP-CONTENTSCO)J GOTO L2; 
ENDIFJ 
ELSE DOi 

BLLERRC5) IF FP 5 CADDR-1 OR FP S FSTP 
CPYADR«-C(FP AND 3777B) *MEUL IF FP<0 EL 

<FP AND 37777BX-NE v ;G>! 
IF TYPE-3 OH TYPE-4 DO J 

STFCCPY ADR); 
ELSE DO J 



;- 1 c rp 



L. - O 



c c 



FTYPE^i 



es>; 



L3 
LA 



COUNT*- <1 IF 

2 IF FTYPE=2 
4 IF FTYPE-5 
ELLERRC4))3 
R«-NEVPi 

STORE (CPYADR* A)j? 
IF COUNT£i DOI 

STORECCPYADR+1* 
IF COUNT02 DO J 

STORE <CPYADR*2* 
STORE* CPY A PR* 3* 
END IF* 
EN OIF* 
ENDIFl 
EWDIF5 
NAV«-NAV*l; 
ENDIFJ 

INTERRUPT'CHECKC >^ 
GOTO L/j IF FP S EftDF-lS 

endfor; 

NEUP^MFW-M $ 



OR FTYPE-9 ELSE 

ELSE 

OR FTYPE=6 ELSE 



C)5 

D)i 



CO: 



•vl 



R"T 



DESCRIPTOR 



-J 
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IF CLL-1 DOI 

R-NEv'PJ 

NEWLI". ! 3 *-L + 9.ij 7 S'STX-** IB 7- ^CPRJ 

NEVGC 14B3<-G IF riCAL>0 AMD R IN G< NiT/N > >RI NG < F ) ; 

END IF J 

IF STK-1 DOI 
IF CLL-l DO 

R-NEWP; NEV?G£2 3«-SP3 
ELSE do; 

R-P; GE23-SP* 
endif; 

ENDXFJ 

IF MCAL=2 DOI 
HENTER8 PROTECT* 4) * 

SET* LOCK* >; 
ENDiFl 

SR S TDFLAG-SR £ PDFLAG-Q IF MCAL>0* 
L«-NEWL5 G*-NEWG* OLDP-P> P-NE'.-JPS 
IF RET=1 DO; 

IF OLDP>=685 DO; 

MEXITf UNPRGTECT(4>i 

RESET' LOCK C> 5 

XMON'TRAPO IF SR S XMONTJ 
ELSE DO 

XUTXL'TRAPC) IF SR S XUTJ.LT> 
END IF* 
ENDIF> 
P«-P+l IF FTW-! AMD FTNATF=0J 

* - EXIT FROM BLL 

GOTO NEXT* INSTRUCTIONS 

* 

STRINGS COUNT*- 45 GOTO L2 IF MCAL=0J 

FORN*-TEMP AND 1436 OR 4371 OLDT«-0; 
FOR I*-0 BY I DO; 

R-P; RINGCHECKCTEMP3 3 

BLL ERR C 6) IF OLDT £ !>/A>TENP S WA OR 

OLDT S VA=T£MP S WA AND 
OLDT S CPOS>TEMP S CPOS3 
R*-NEVP5 SCCPVADR+D-TEHP AND NOT 7436 OR FORM; 
GOTO L3 IF 1 = 35 R*-OLDR; OLDT-TEMP; 
. TEMP-CQNTENTS<ARGADR*I*1 >5 
END FOR 3 

LABELS Q-CTEMP S FLU IF TEMP £ BIT4=0 
ELSE ARGADR^TEMP S FSRV)J 

RINGCHECKCQ) IF KCAL>0; 

R«-NEVP* 

STORE<CPYADR* G AND NOT 7536 OR TEfiP AND 75B6>J 

R«-OLDRS BRD<-CONTENTS<ARGADR*l > < 

IF BRD S FE---C AND BRD S FSTK=G DOS 
BRD>BRO AND NOT 4B7 IF MCAL>OJ 
DRD-BRR OR <L IF STK-v: ELSE NEVL-:-2H7* 4D6> j 



100 



sr\ 



v 
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elsf: do; 

ELL ERR Cf.) IF i:CAL>C.s 

R-r:~: ! ;p; 

STORE<COPYADR+i*BRD>* GOTO L2-J 



ARRAYS R^NEVPi £CPYADR*-T£MPS 

BLLERRC6) IF TEMP S I A T£32 
IF MCAL>0 DO 5 

IR-CTEt-5P S U8! IF TEMP S LEB-G ELSE TEMP S UD2)J 

IA<ARGADR*1 >J RINGCHECK < D >l 
ENDIFl 

ir-0; r-argadr; ia<argadr+i >s 
bll e rr < 6 ) if i mm £ d i a t e - ! j 

RIWGCHECK(G) IF MCAL>G3 

R-NEMP3 

$<CPYADR*1 >«-<G+C436 IF READONLY-0 ELSE 1236) )« 

GOTO L3S 



